In Abhängigkeit vom Fokus bestimmte Aktionen durchführen

[Lago]

Hallo,

ich habe auf meiner Userform 20 TextBoxen. Bei einem Teil der TextBoxen soll Aktion A ausgeführt werden wenn diese den Focus haben, bei einem
anderen Teil der TextBoxen soll Aktion B ausgeführt werden wenn sie den Fokus besitzen und bei dem Rest soll Aktion C ausgeführt werden, falls
diese den Fokus besitzen.

Wie setze ich so etwas programmiertechnisch mit VBA um?

[Rabe]

Hi,

ohne davon (Klassenprogrammierung) Ahnung zu haben, stelle ich mir vor, daß Du Dir 3 Klassen von Textboxen erstellst und dann den Klassen die entsprechenden Aktionen zuprogrammierst und jeder Textbox die entsprechende Klasse zuweist.

Da müssen jetzt aber die VBA-Profis ran, und nicht ich Lehrling.

[Jonas0806]

Hallo,

ich fürchte, dass das so mit dem Fokus nicht klappen wird. Leider sind für eigene Klassen nich alle Events von Steuerelementen verfügbar, so auch für die TextBox nur die folgenden.

   

Könntest Du Dich mit einen dieser Events anfreunden?

[schauan]

Hallöchen,

im Userform hat die TextBox auch noch das ENTER- und ein EXIT-Ereignis. Eventuell hilft Dir das.

Code:

Private Sub TextBox1_Enter()
MsgBox "ENTER"
End Sub

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
MsgBox "EXIT"
End Sub