Sub Makro1()
' Makro1 Makro
' Makro am 06.08.2003 von Michael Scheffler aufgezeichnet
ActiveSheet.OLEObjects.Add(ClassType:="Forms.OptionButton.1", Link:=False, _
DisplayAsIcon:=False, Left:=64.5, Top:=37.5, Width:=108, Height:=19.5 _
).Select
ActiveSheet.OLEObjects.Add(ClassType:="Forms.OptionButton.1", Link:=False, _
DisplayAsIcon:=False, Left:=69, Top:=90.75, Width:=108, Height:=19.5) _
.Select
ActiveSheet.OLEObjects.Add(ClassType:="Forms.OptionButton.1", Link:=False, _
DisplayAsIcon:=False, Left:=77.25, Top:=156, Width:=108, Height:=19.5 _
).Select
End Sub
Sub Test()
ActiveSheet.OLEObjects("Optionbutton1").Object.GroupName = "Test"
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen