wie kann ich den Beschriftungsfeld (hier Label1), auf einer Userform, die Schrift Wingdings zuweisen, damit über den Text in Feld Caption, eine anderes Zeichen entsteht?
Freue mich auf eine Rückmeldung und/oder Info.
Gruß, Dieter(Drummer)
Private Sub UserForm_Initialize()
UserForm1.Label1.Font.Size = 16
UserForm1.Label2.Font.Size = 16
Label1.ForeColor = RGB(255, 0, 0)
Label2.ForeColor = RGB(255, 0, 0)
End Sub
Private Sub UserForm_Initialize()
Label1.Font.Size = 16
Label2.Font.Size = 16
Label1.ForeColor = RGB(255, 0, 0)
Label2.ForeColor = RGB(255, 0, 0)
End Sub
Private Sub UserForm_Initialize()
Label1.ForeColor = RGB(255, 0, 0)
Label2.ForeColor = RGB(255, 0, 0)
End Sub