|
Hallo,
ja gerne!
Also ich habe 4 Comboboxen auf meinem Tabellenblatt1.
Die alle die selbe Funktion haben sollen. Wenn beim Ausfüllen dieser eine übersprungen wird, zb. wurde erst ombobox 3 anstatt Combobox 2 ausgefüllt, soll diese Fehlermeldung (Msgbox) erscheinen. Wenn zb. direkt mit Combobox 3 angefangen wird, soll diese Fehlermeldung auch nur einmal erscheinen, auch wenn Combobox1 und Combobobox 2 übersprungen worden sind.
Mein derzeitiger Code:
Private Sub ComboBox2_GotFocus()
If ComboBox1.Listindex = -1 Then
MsgBox "Fehlermeldung"
ComboBox1.Activate
End If
End Sub
Den habe ich analog für die anderen drei Comboboxen und es funktioniert! Nur bekomme ich für jede einzelne Combobox die übersprungen wurde, stets eine Fehlermeldung und das will ich vermeiden.
Ich möchte nur einmal eine Messagebox, das heißt auch wenn mehrere Comboboxen übersprungen wurden.
Jemand eine Idee?
VG
|