For Each - Welche Systematik bei Reihenfolge?
Thorsten
ich habe ein Problem mit der Reihenfolge, die bei der "For Each"-Schleife genutzt wird. Ich nutze ein Userform für den Print-Dialog. In diesem UserForm werden sämtliche Blätter als Checkbox angezeigt. Reihenfolge (Auszug):
Checkbox_Start -> "START"-Blatt / TabStop 1
Checkbox_ExRates -> "ExRates"-Blatt / TabStop 2
Checkbox_01 -> "01"-Blatt / TabStop 3
Checkbox_02 -> "02"-Blatt / TabStop 4
Dabei tragen die Checkboxen die o.a. Namen. Auch die Tabreihenfolge ist wie angegeben. Wenn ich nun aber den Code:
For Each Ctrl In Me.Controls
If InStr(Ctrl.name, "CheckBox") = 1 Then 'Es gibt diverse Steuerelemente, daher eingrenzen auf Checkboxes
If Ctrl.Value = True Then 'Wenn CheckBox ausgewählt ...
blattname = Mid(Ctrl.name, 10, 36) 'Blattname entspricht Checkbox-Name ohne Prefix "Checkbox_"
Sheets(blattname).PrintOut , , copies, False, ComboBox_Printer.Text 'Blatt drucken
End If
End If
Next
ausführe, werden die Blätter in folgender Reihenfolge durchlaufen:
01 -> START -> 02 -> ExRates
Welche Systematik steckt dahinter? Und wie kann ich diese ggf. beeinflussen?
Danke für die Unterstützung,
Thorsten