Supportnet / Forum / Tabellenkalkulation
VBA Geschwindigkeit
Frage
Hallo an alle VBA-Experten,
ich lasse in einer Schleife für einen markierten Bereich verschiedene Textpassagen ersetzen.
Die Markierung setze ich mit "UsedRange.Rows.Count"
Dann:
For Each Zelle in Selection
If InStr..... .....Application.Substitute.....usw.
Das klappt auch wunderbar, bloss bei 10.000 Zeilen aufwärts belegt Excel die ganze Prozessorleistung.
Gibt's da den einen oder anderen Tipp für eine "erhöhte Drehzahl" ?
MfG
schnallgonz
Antwort 1 von schnallgonz
Schon wieder Entwarnung,
konnte meine Frage selbst beantworten.
Wen's interessiert:
Erst die Zeilen zählen lassen, dann eine einfache
"For i = 2 To Anzahlzeilen" Schleife,
in jeder Zelle alle Änderungen im Hieb,
in die nächste Zeile mit
"ActiveCell.Offset(1, 0).Activate"
und weiter geht's.
Das Ganze bringt mindestens eine Verzehnfachung an Geschwindigkeit und der Prozessor macht's im Halbschlaf!
MfG
schnallgonz
konnte meine Frage selbst beantworten.
Wen's interessiert:
Erst die Zeilen zählen lassen, dann eine einfache
"For i = 2 To Anzahlzeilen" Schleife,
in jeder Zelle alle Änderungen im Hieb,
in die nächste Zeile mit
"ActiveCell.Offset(1, 0).Activate"
und weiter geht's.
Das Ganze bringt mindestens eine Verzehnfachung an Geschwindigkeit und der Prozessor macht's im Halbschlaf!
MfG
schnallgonz