Hallo zusammen,
suche nun schon seit ein paar Tagen in diversen Foren und werde nicht fündig.
Ich erstelle per VBA mehrere Command Buttons und möchte diese nun per VBA verlinken und bearbeiten. Wie mache ich das?
a = 14
For i = 1 To 3
Set Obj = ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", _
Link:=False, DisplayAsIcon:=False, Left:=300, Top:=a, Width:=100, Height:=30)
Obj.Name = "S_Btn" & i
ActiveSheet.OLEObjects(i).Object.Caption = "Namen überführen"
a = a + 43
Next
Manuell mache ich das natürlich mit Doppelklick auf den CmdBttn und programmiere dann wie gewohnt.
Wie kann ich das "Doppelklick auf den CmdBttn" am besten programmieren ?
Herzlichen Dank und viele Grüße
Simon
|