Herbers Excel-Forum - das Archiv
Makro-Geschwindigkeit bei bedingter Formatierung
- Makro-Geschwindigkeit bei bedingter Formatierung von Jan Hennings vom 29.12.2006 15:21:51
- AW: Makro-Geschwindigkeit bei bedingter Formatierung - von Luschi am 29.12.2006 17:40:36
 |
Betrifft: Makro-Geschwindigkeit bei bedingter Formatierung
von: Jan Hennings
Hallo zusammen,
ich nutze beim Aufbereiten einer Liste die bedingte Formatierung, um spätere, manuelle Änderungen an den Daten komfortabel sichtbar zu machen. Weicht der Inhalt der Zelle vom ehemaligen Wert (der ja dann noch in der bedingten Formatierung hinterlegt ist) ab, wird er nett eingefärbt.
Prinzipiell funktioniert alles bestens, nur die geringe Geschwindigkeit beim Ablauf des Skriptes nervt etwas. Es sind ca. 50.000 Zellen, die mit Werten und einer bedingten Formatierung versehen werden.
Gibt es eine Möglichkeit, noch etwas aus- und später wieder anzuschalten (automatische Neuberechnung ist schon aus), um den Ablauf zu beschleunigen?
Viele Grüße aus Hamburg,
Jan
 |
Betrifft: AW: Makro-Geschwindigkeit bei bedingter Formatierung
von: Luschi
Geschrieben am: 29.12.2006 17:40:36
Hallo Jan,
benutze folgende Routine:
Sub getMoreSpeed(bDoIt As Boolean) 'Bildschrimaktualisierung Application.ScreenUpdating = Not (bDoIt) 'Ereignisteuerung Application.EnableEvents = Not (bDoIt) 'Berechnung der Formeln Application.Calculation = IIf(bDoIt, xlCalculationManual, xlCalculationAutomatic) End Subam Anfang der Procedure:
getMoreSpeed True 'Ausschalten
und am Ende:
getMoreSpeed False 'wieder Einschalten
Gruß von Luschi
aus klein-Paris
| |