Hallo an die Experten im Forum,

in meiner Userform möchte ich für alle Labels mehrere Eigenschaften setzen.
Mein Code funktioniert auch. Meine Frage ist, ob man das auch einfacher
lösen kann. Hier mein Code :

Private Sub UserForm_Initialize()
Dim lb As Object
For Each lb In UFLB.Controls
If TypeName(lb) = "Label" Then lb.BorderStyle = 0
If TypeName(lb) = "Label" Then lb.BackStyle = 0
Next lb
End Sub

Vielen Dank im Voraus.