Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

CellsFindNext

Forumthread: CellsFindNext

CellsFindNext
16.07.2003 18:18:39
Andy
Hallo,

gibt es die Möglichkeit innerhalb einer definierten Range (ca. 200 Werte) die Anzahl gleicher Ereignisse zu finden? Würde das momentan mit einer Schleife machen. Das ist natürlich sehr zeitaufwendig für das Makro! Habe es wie folgt probiert!

Cells.Find(What:=Handle).Activate
Cells.FindNext(After:=ActiveCell).Activate

mein Problem ist nun dass er sich nicht innerhalb der Range bewegt bzw. wenn er einmal durch die Range durchgelaufen ist aufhört.

Habt ihr eine Idee?

Grüße

Andy
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: CellsFindNext
16.07.2003 18:30:01
Knut
In der Hilfe ist eine Schleife zu Find, die recht ausságekräftig ist.

Knut


AW: CellsFindNext
16.07.2003 18:25:01
Bernd Held
Hallo Andy,

ich würde mir die erste Fundstelle in eine Variabel schreiben:
POS=Activecell.Row

Dann die nächste Suchen-Befehle in einer Schleife

Do while activecell.row<> POS

loop

nicht getestet, aber so in der Art sollte es funktionieren

Viele Grüße
Bernd
MVP für Microsoft Excel
Excel-Tipps, VBA-Bücher mit Leseproben(PDF), VBA-Forum und VBA-Schulungen unter: http://held-office.de



Anzeige
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18