Ist es möglich den Inhalt einer Zelle für die Beschriftung eines Buttons zu verwenden? Wenn ja, wie?
Thomas
Private Sub CommandButton1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
CommandButton1.Caption = [A1]
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
CommandButton1.Caption = Target.Value
End Sub
Private Sub Workbook_Open()
Userform1.CommandButton1.Caption ="Mein Text"
End Sub