Probleme mit einer Schleife
24.05.2004 08:31:01
Logan
ich möchte hier ne Funktion laufen lassen, solange es Ergebnisse in der Tabelle gibt.
Cells.Find(What:="-~*~*-", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Offset(0, 1).Value = "1"
eine Do Until IsEmpty-Schleife lässt es dauerhaft diesen Vorgang durchführen.
Was kann ich jetzt machen um den zu beenden?
Oder kann ich da ne andere Schleife verwenden bzw. statt IsEmpty ne Funktion für das letzte Ergebniss der Tabelle verwenden?
MfG
Logan