Do While
10.10.2007 11:13:23
goldfoil
ich sitze mal wieder vor einem Problem und bräuchte Hilfe. Ich habe eine Do While Schleife und die ist aber bei 1000 Zeilen und 100 Spalten ziemlich langsam.
Do While Cells(Zeile, 2) "" And Cells(Zeile, 10) ""
If Cells(Zeile, 2) = K And a = "0" Then
Rows(Zeile).Hidden = False
ElseIf Cells(Zeile, 2) = K And (Freigabe) And Cells(Zeile, 10) = a Then
Rows(Zeile).Hidden = False
Else
Rows(Zeile).Hidden = True
End If
Zeile = Zeile + 1
Loop
Könnte mir bitte jemand weiterhelfen?
Vielen Dank im Voraus.
vlg goldfoil