CheckBox in VBA ansprechen

[Joachim Friedrich]

Hallo,

ich habe auf einem Tabellenblatt fünfzig CheckBoxen eingefügt und möchte
diese mit Hilfe einer Schleife ansprechen. Leider konnte ich nichts finden
wie man das realisieren könnte.

Und gibt es keine Extra Newsgroupü für VBA für Excel?

vielen dank....

[Andreas W. Knopke]

Hallo Joachim,

> ich habe auf einem Tabellenblatt fünfzig CheckBoxen eingefügt und möchte
> diese mit Hilfe einer Schleife ansprechen. Leider konnte ich nichts finden
> wie man das realisieren könnte.

Du kannst nur die Steuerelemente auf der Form insgesamt über die
Controls-Auflistung mit Index ansprechen. Dann muß bei jedem
Element über die TypeName-Eigenschaft festgestellt werden, ob
es eine Checkbox ist:

For i=1 to Controls.Count
if TypeName(Controls(i))="Checkbox" Then
.
.
Next

Eine andere Möglichkeit besteht darin, Dir selbst ein Stringarray zu
basteln und die Namen der Checkboxen darin zu speichern. Dann kannst
Du die Schleife über Dein Array jagen.

> Und gibt es keine Extra Newsgroupü für VBA für Excel?

Nein; allerdings beschäftigt sich diese hier zu einem sehr großen Teil mit
VBA.

--
Viele Grüße aus der Südpfalz * Windows 2000 Professional (SP2)
Andreas * Office 2000 Premium (SP2)
-----------------------------------------------------------------

[Andreas W. Knopke]

Hallo Joachim,

ich muß mich korrigieren, da ich übersehen hatte, daß Du mit einem
Tabellenblatt arbeitest:

Sub CBsAuflisten()
Dim i%
For i = 1 To Tabelle1.OLEObjects.Count
If UCase(Left(Tabelle1.OLEObjects(i).Name, 8)) = "CHECKBOX" Then
MsgBox "Hab eine CheckBox gefunden"
End If
Next
End Sub

Es ist dann die OLEObjects-Auflistung, mit der Du arbeiten mußt

--
Viele Grüße aus der Südpfalz * Windows 2000 Professional (SP2)
Andreas * Office 2000 Premium (SP2)
-----------------------------------------------------------------

"Andreas W. Knopke" <ne...@knopke.de> schrieb im Newsbeitrag
news:#LTS2G4QBHA.1788@tkmsftngp03...

[Joachim Friedrich]

hallo andreas...

vielen dank für die schnelle antwort....

aber noch eine frage...was bedeutet das % zeichen hinter der 1?

mfg

joachim

"Andreas W. Knopke" <ne...@knopke.de> schrieb im Newsbeitrag

news:#eLx#V4QBHA.1788@tkmsftngp03...

[Andreas W. Knopke]

Hallo Joachim,

das ist keine '1', sondern ein 'i', das als Zählervariable in der
Schleife verwendet wird. % ist das Typkennzeichen für Integer-Variablen.
Mehr dazu unter Datentypen in der Online-Hilfe.

--
Viele Grüße aus der Südpfalz * Windows 2000 Professional (SP2)
Andreas * Office 2000 Premium (SP2)
-----------------------------------------------------------------

"Joachim Friedrich" <joa...@online.de> schrieb im Newsbeitrag
news:9okgjp$va5$02$1...@news.t-online.com...