Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Klapptnicht vom 02.07.2021, 15:49 Options
Userform After_Update
Hallo,
ich bin grad dabei mich ins Thema Userform einzuarbeiten und hab da mal eine Verstädnis Frage:
Bsp.:
Ich habe in dem Textfeld7 eine Prüfung bei "AfterUpdate" eingebaut.
Wenn die Prüfung fehlschlägt, soll die Userform wieder angezeigt werden, damit der User den Fehler korrigieren kann...
Ganz doof gefragt: wie komme ich von dem "After_update" wieder an den "Anfang" der Userform bzw. wo befinde ich mich innerhalb der Userform, wenn die After_Update Routine zu ende ist ??
Danke schon mal ...
Klappnicht
ich bin grad dabei mich ins Thema Userform einzuarbeiten und hab da mal eine Verstädnis Frage:
Bsp.:
Ich habe in dem Textfeld7 eine Prüfung bei "AfterUpdate" eingebaut.
Wenn die Prüfung fehlschlägt, soll die Userform wieder angezeigt werden, damit der User den Fehler korrigieren kann...
Ganz doof gefragt: wie komme ich von dem "After_update" wieder an den "Anfang" der Userform bzw. wo befinde ich mich innerhalb der Userform, wenn die After_Update Routine zu ende ist ??
Danke schon mal ...
Klappnicht
Antwort 1 von Hajo_Zi vom 02.07.2021, 15:58 Options
Hallo Nick,
ich vermute mal Du meinst Textbox. Benutze das Exit Ereignis Cancel=true
Gruß hajo
ich vermute mal Du meinst Textbox. Benutze das Exit Ereignis Cancel=true
Gruß hajo
Antwort 2 von Klapptnicht vom 02.07.2021, 16:12 Options
Hi Hajo,
sorry, ja Textbox ...
Mein Problem ist:
Private Sub TextBox7_AfterUpdate()
If IsDate(TextBox7.Text) Then
..mache das
Else
Fehler... --> Userform neu anzeigen
End If
end sub
Wie komme von da zum Exit-Ereignis ??
Oder habe ich da n Denfehler ??
Klapptnicht
sorry, ja Textbox ...
Mein Problem ist:
Private Sub TextBox7_AfterUpdate()
If IsDate(TextBox7.Text) Then
..mache das
Else
Fehler... --> Userform neu anzeigen
End If
end sub
Wie komme von da zum Exit-Ereignis ??
Oder habe ich da n Denfehler ??
Klapptnicht
Antwort 3 von Hajo_Zi vom 02.07.2021, 16:15 Options
Hallo Nick,
nicht von da ich hatte geschrieben benutze das Exit Ereignis.
Gruß Hajo
nicht von da ich hatte geschrieben benutze das Exit Ereignis.
Gruß Hajo
Antwort 4 von Klapptnicht vom 02.07.2021, 16:48 Options
.. ahh, jetzt habe ichs verstanden ...
Klappt auch soweit schon, nur hab ich einen Abbruch Button in der Userform + wenn ich den jetzt betätige, kommt zuerst die Fehlermeldung des Exit-Ereignis + beim 2. klicken wird die Userform geschlossen ..
Muß ich das noch irgendwie abfangen ??
Klappt auch soweit schon, nur hab ich einen Abbruch Button in der Userform + wenn ich den jetzt betätige, kommt zuerst die Fehlermeldung des Exit-Ereignis + beim 2. klicken wird die Userform geschlossen ..
Muß ich das noch irgendwie abfangen ??
Antwort 5 von Hajo_Zi vom 02.07.2021, 16:50 OptionsLösung
Hallo Nick
beim CommandButton zu beginn
Textbox1.Tag=1 und vor end Sub Textbox1.Tag="" und beim Exit ereignis zu Beginn If Textbox1.tag<>"" then exit sub
Gruß Hajo
beim CommandButton zu beginn
Textbox1.Tag=1 und vor end Sub Textbox1.Tag="" und beim Exit ereignis zu Beginn If Textbox1.tag<>"" then exit sub
Gruß Hajo
Antwort 6 von Klapptnicht vom 02.07.2021, 17:02 Options
Jau, super. klappt :-)))
Danke dir :-)))
Danke dir :-)))
Ähnliche Themen
Auswahlfeld in Userform
jackson84 24.01.2008 - 83 Hits - 30 Antworten
UserForm ComboBox
fedjo 26.04.2008 - 41 Hits - 3 Antworten
UserForm ComboBox
fedjo 20.05.2008 - 189 Hits - 3 Antworten
Excel UserForm
fedjo 30.05.2008 - 101 Hits - 2 Antworten
UserForm ListBox
fedjo 15.06.2008 - 165 Hits - 8 Antworten
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
