ich will ne kleine schleife, komme aber werder mit loop noch mit wend oder for zum ziel.
a = Array(Worksheets("Drucken").AuswSparte1.ListIndex, Worksheets("Drucken").AuswSparte2.ListIndex)
For i = 1 To UBound(a)
If ListIndex = 1 Then
ElseIf ListIndex = 2 Then
End If
Er meldet zwar keinen Fehler, aber bearbeitet die If auch net wirklich.
Fehler bei "For i = 1 To UBound(a)"?
Schonmal Danke,
Ingo