Hi,
das geht mit folgendem Code (für jeden CommandButton den Namen des Buttons anpassen):
Private Sub CommandButton1_Click() ActiveCell.Value = CommandButton1.Caption End Sub
Bis später, Karin
58.4k Fragen
249k Antworten
7k Nutzer