Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
280to284
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
280to284
280to284
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

CellsFindNext

CellsFindNext
16.07.2003 16: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

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

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

Knut


AW: CellsFindNext
16.07.2003 16: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

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige