Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1516to1520
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Focus nicht verlassen

Focus nicht verlassen
06.10.2016 06:05:03
Markus
Hallo
bei diesem VBA in einem Formular, verlässt Excel einfach das Feld, obwohl ich einen Focus setze bei Fehler.
Jetzt schon herzlichen Dank für einen Tipp
Markus

Private Sub txtANR_Exit(ByVal Cancel As MSForms.ReturnBoolean)
' Falls keine Eingabe gemacht, Mustermann löschen ..
If txtANR.Value = "Mustermann Fritz" Then
txtANR.Value = ""
End If
' wenn Name & Vorname kürzer als 7 Zeichen, neuer Focus
If Len(txtANR.Value) 

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Focus nicht verlassen
06.10.2016 08:38:12
Beverly
Hi Markus,
bach diesem Prinzip:
Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Cancel = Not IsNumeric(TextBox2)
End Sub

TextBox wird nicht verlassen solange keine Zahl eingegeben wird.


Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige