Durchnumerierte Objekte per schleife auswählen

Computer: Software & Programmierung Visual Basic
1

Hallo Leute,

ich bin Einsteiger in Sachen VBA, und habe ein Userform mit mehreren Togglebuttons(1-100)
Diese möchte ich in einer Schleife mit der Variablen i nacheinander auswählen und entsprechend vorgegebener Daten vorauswählen.
für den ersten Togglebutton sieht die Zeile wiefolgt aus:
UserForm1.ToggleButton1.Value = True

Jetzt zu meiner Frage: wie muss ich die Variable i einsetzen damit diese an den Begriff Togglebuttons angehängt wird?

Danke
Henri

2

ich würde es in arrays schreiben, dann kann man indiziert drauf zugreifen

3

Danke für die schnelle Antwort!

Aber wie bekomme ich die die Werte

Togglebutton1… Togglebutton100

in das Array ohne alle Elemente per Hand dort einzutragen.
Das wäre ja immer noch ein großer Aufwand.

Henri

4

kommt drauf an…

in VBA (also excel und Co) gehts (glaub ich) nicht

sonst

halt schleife jeweils nur mit
array(i) = (new )togglebutton
//position undd grösse angeben

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

5

Hallo Leute,

Hi,
so gehts:

Dim i As Integer
For i = 1 To 100
 UserForm1.Controls("ToggleButton" & i).Value = True
Next i

Gruß.Timo

ich bin Einsteiger in Sachen VBA, und habe ein Userform mit
mehreren Togglebuttons(1-100)
Diese möchte ich in einer Schleife mit der Variablen i
nacheinander auswählen und entsprechend vorgegebener Daten
vorauswählen.
für den ersten Togglebutton sieht die Zeile wiefolgt aus:
UserForm1.ToggleButton1.Value = True

Jetzt zu meiner Frage: wie muss ich die Variable i einsetzen
damit diese an den Begriff Togglebuttons angehängt wird?

Danke
Henri

6

Hallo Leute meine Schleife sieht jetzt so aus:

Dim i As Integer
Dim A(49) As Variant
i = 1
While i „“ Then
A(i - 1).Value = True
Else:
A(i - 1).Value = False
End If
i = i + 1
Wend

Im Array A stehen nach der ersten Schleife die Togglebuttons von 1-49 durchnumeriert drin. Aber im If-Else-Zweig kommt die Fehlermeldung „Objekt erforderlich“
Gebe ich aber die Togglebuttons per Hand ein, funktioniert die untere Schleife.

Ich denke die Kombination aus text und Variable ’ „UserForm1.togglebutton“ & i ’ stellt das Problem dar.

Danke

Henri