Der Makro Recorder liefert mir für eine OptionBox das hier:
Aber wie mache ich daraus select all?
Sub aaa()
' aaa Macro
ActiveSheet.Shapes.Range(Array("Option Button 269")).Select
With Selection
.Locked = False
.LockedText = False
End With
End Sub
Sub aaa()
' aaa Macro
ActiveSheet.Shapes.Range(Array("Option Button 269")).Select
With Selection
.Locked = False
.LockedText = False
End With
End Sub
Dim Ctl as Control
For Each ctl In Me.Controls
If TypeOf ctl Is MSForms.OptionButton Then
next ctl
Im Arbeitsblatt kann man durch alle Shapes iterieren und auf den Namen prüfen.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