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.7k Fragen
251k Antworten
7.3k Nutzer