Wechselbutton mit Zeilenumbruch
21.08.2021 10:51:53
Robert
ich hätte gern ein Wechselbutton mit Zeilenumbruch:
Dazu habe ich folgenden Befehl programmiert, der auch so funktioniert:
Private Sub CommandButton1_Click()
If CommandButton1.Caption = "Deaktiviert" Then
CommandButton1.Caption = "Aktiviert"
Else
CommandButton1.Caption = "Deaktiviert"
End If
End Sub
Es steht nur der erste Text mit Zeilenumbruch im Button.
Private Sub CommandButton1_Click()
If CommandButton1.Caption = "Deaktiviert" & vbLf & "zum aktivieren klicken" Then
CommandButton1.Caption = "Aktiviert"
Else
CommandButton1.Caption = "Deaktiviert" & vbLf & "zum aktivieren klicken"
End If
End Sub
Kann jemand helfen?
VG
Robert