Schleife
03.03.2004 15:59:32
Thomas
hatte schon mal so ein ähliches Problem bei dem man mir weiterhelfen konnte, aslo versuch ich es mal:
Ich habe folgenden Code
If Columns("C:C").Hidden = False Then
frmAuswahl.CheckBox1.Value = True
Else
frmAuswahl.CheckBox1.Value = False
End If
Ich möchte nun eine Schleife programmieren, die in jedem Schritt dein nächste Spalte wählt und die nächste Checkbox; nächtser müsste also so lauten
If Columns("D:D").Hidden = False Then
frmAuswahl.CheckBox2.Value = True
Else
frmAuswahl.CheckBox2.Value = False
End If
Das ganze soll für 180 Checkboxen funktionieren. Vielleicht kannt jemand eine Lösung
Gruß
Thomas