ich verwende für alle Comboboxen und Textboxen in einer UserForm den gleichen Code für das "Enter" und das "Exit"-Ereignis:
Private Sub ComboBox36_Enter()
ComboBox36.BackColor = &H80FFFF
ComboBox36.BorderStyle = fmBorderStyleSingle
End Sub
Private Sub ComboBox36_Exit(ByVal Cancel As MSForms.ReturnBoolean)
ComboBox36.BackColor = vbWhite
ComboBox36.BorderStyle = 1
ComboBox36.SpecialEffect = fmSpecialEffectEtched
End Sub
Gibt es eine Möglichkeit diesen Code in einem "universellen" Enter- und Exit-Ereigniss für alle Comboboxen bzw. Textboxen zu schreiben?
Ich wäre für Ideen sehr dankbar!
Viele Grüße
Martin