Hallo zusammen,
ich hoffe, es kann mir jemand von Euch helfen.
Auf einem Tabellenblatt habe ich 30 Checkboxen als Formularsteuerelemente eingefügt. Diese lassen sich auch problemlos über VBA ansprechen. Zum Beispiel mit diesem Code:
Sub Schaltfläche8_Klicken()
Dim Sh As Worksheet
Dim cb As CheckBox
Sheets("A_blatt").Activate
Range("a1").Select
For Each cb In ActiveSheet.CheckBoxes
cb.Visible = False
cb.Caption = "K.A."
Next cb
End Sub
Will ich aber den Namen oder die Beschriftung der angeklickten Checkbos auslesen, dann erhalte ich eine Fehlermeldung (Objekt unterstützt diese Eigenschaft oder Methode nicht)
Sub Kontrollkästchen4933_Klicken()
a = ActiveSheet.checkbox4933.Name
b = aktivesheet.checkbox4933.Caption
End Sub
Ich bin nicht so fit in VBA und verstehe auch nicht den Unterschied zwischen den Active-X und den Formular-Steuerelementen.
Es verwirrt mich auch, dass die Sub-Routine von VBA mit Sub Kontrollkästchen benannt wird, ich die Steuerelemente aber mit CheckBox... ansprechen muss.
Ich bin für jeden Tipp sehr dankbar.
Gruß
Herbert
|