Optionsbutton und Commandbutton ohne Eigenschaftsd
20.06.2006 14:45:54
Kersten
wenn ich einen Optionbutton oder einen Commandbutton in ein Tabellenblatt via VBA einfüge und anschließend mit der rechten Maustaste das Kontextmenü des Buttons öffne, fehlt der Eintrag "Eigenschaften".
ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", Link:=False, _
DisplayAsIcon:=False, Left:=334.5, Top:=0.75, Width:=47.25, Height _
:=19.5).Select
oder
ActiveSheet.OLEObjects.Add(ClassType:="Forms.OptionButton.1", Link:=False, _
DisplayAsIcon:=False, Left:=0.75, Top:=404.25, Width:=12.75, Height _
:=12.75).Select
Ein weiterer Unterschied, den ich dem Kontextmenü entnehmen kann ist, dass die manuell eingefügten Buttons als "Steuerelement" und die per VBA Eingefügten als "Object" bezeichnet werden.
Der oben stehende VBAcode wurde sogar mit dem Makrorecoder aufgezeichnet, geht aber trotzdem nicht.
Zur Zeit behelfe ich mir damit, dass ich ein Commandbutton mit der Hand erstelle, über diesen den Eigenschaftsdialog öffne und anschließend den über VBA erstellen Button selektiere. Dann geht das, aber ziemlich Umständlich. Was mache ich hier falsch?
Vielen Dank
Kersten