Thema Datum  Von Nutzer Rating
Antwort
07.04.2004 16:29:40 manuel
NotSolved
08.04.2004 08:55:45 Oliver
NotSolved
14.04.2004 14:16:09 manuel
NotSolved
14.04.2004 17:01:46 Oliver
NotSolved
Rot Aw:Aw:Aw:Aw:Excel-Formular
15.04.2004 11:57:30 manuel
NotSolved
15.04.2004 12:45:30 Oliver
NotSolved
15.04.2004 12:57:07 manuel
NotSolved

Ansicht des Beitrags:
Von:
manuel
Datum:
15.04.2004 11:57:30
Views:
1140
Rating: Antwort:
  Ja
Thema:
Aw:Aw:Aw:Aw:Excel-Formular
hallo,

komisch aber so genau weiss ich einfachned was dumeisnt - hier mal mein code -
Private Sub cmdEinfuegen_Click()
Dim inty As Integer
Dim w As String
Dim inty4 As String

With ThisWorkbook.Worksheets("Tabelle1")
inty = 2
Do Until .Cells(inty, 1) = ""
inty = inty + 1
Loop

Cells(inty, 1) = inty
Cells(inty, 2) = txtNachname
Cells(inty, 3) = txtVorname
If txtGeschlecht <> "w" Then
If txtGeschlecht <> "m" Then
MsgBox "TEST"
txtGeschlecht.SetFocus
txtGeschlecht = ""
Else
Cells(inty, 4) = txtGeschlecht
End If
End If
Cells(inty, 5) = txtAlter
End With

End Sub

Private Sub cmdEnde_Click()
Unload Me
End Sub

Private Sub cmdLoeschen_Click()
txtNachname = ""
txtVorname = ""
txtGeschlecht = ""
txtAlter = ""
End Sub


und da siehste ja soll nur was reingeschrieben werden wenn geschlecht
= m oder w!

danke und gruss!

manuel!





Oliver schrieb am 14.04.2004 17:01:46:

Hallo Manuel,

versuch dichmal mit dem textbox-ereignis. du hast verschiedene ereignisse zur auswahl - ich denke keydown ist das ereignis das du suchst. soll nur beim verlassen geprüft werden, ist es denke ich "exit" bzw. lostfocus

teste mal die ereignise durch- bei problemen meld dich nochmal und poste deinen code

gruß

oliver


manuel schrieb am 14.04.2004 14:16:09:

hallo oliver,

ne - leider so nicht!

ich gebe die daten ja nicht ins excel ein sondern in ein formular! und da soll er mir praktisch die eingabe abrechen wenn ich was falsches eingtippt hab.

gruss manuel!




Oliver schrieb am 08.04.2004 08:55:45:

Hallo Manuel,

wechsel im VBA-Editor auf die Tabelle1. Oben in der Ereignisauswahl wählst Du Worksheet1 aus, und rechts z.b. "selection change"

in das ereignis schreibst du z.b. "hallo"

wenn du nun im excel-sheet die zelle wechselst, sollte die msgbox aufpoppen. nun einfach in diesem ereignis die zelle richtige zelle abfragen und darauf reagieren....

kommst du damit zurecht??

gruß

oliver


manuel schrieb am 07.04.2004 16:29:40:

hallo zusammen,

hab mal weider n kleines problem - und zwar - hab ich da im excel n formular in welchem ich daten wie vorname nachname geschlecht etc eingebe die er mir dann wenn ich nen button klick mit id in zellen schreib - je name eine zeile - nun moechte ich wenn in den feld geschlecht - kein m oder kein w drinn ist das er mir sagt he mach du mal da n w oder m rein und das er mir dann die anderen daten NICHT in die zelle schreibt - hm - big problem oder?

gruss manuel!

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
07.04.2004 16:29:40 manuel
NotSolved
08.04.2004 08:55:45 Oliver
NotSolved
14.04.2004 14:16:09 manuel
NotSolved
14.04.2004 17:01:46 Oliver
NotSolved
Rot Aw:Aw:Aw:Aw:Excel-Formular
15.04.2004 11:57:30 manuel
NotSolved
15.04.2004 12:45:30 Oliver
NotSolved
15.04.2004 12:57:07 manuel
NotSolved