Anzeige
Archiv - Navigation
832to836
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
832to836
832to836
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Makro-Geschwindigkeit bei bedingter Formatierung

Makro-Geschwindigkeit bei bedingter Formatierung
29.12.2006 15:21:51
Jan
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

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro-Geschwindigkeit bei bedingter Formatierung
29.12.2006 17:40:36
Luschi
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 Sub
am Anfang der Procedure:
getMoreSpeed True 'Ausschalten
und am Ende:
getMoreSpeed False 'wieder Einschalten
Gruß von Luschi
aus klein-Paris
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige