Beim Formatieren sehr langsam

Forumthread: Beim Formatieren sehr langsam
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Beim Formatieren sehr langsam

18.10.2006 14:37:03

Silvia

Hallo zusammen,
ich habe folgendes Problem. Ich habe eine Excelliste mit 200 Zeilen und 10 Spalten. Jetzt ist jede 2.te Zeile mit der davorherigen aus diversen Gründen gemergt. Jetzt habe ich ein CommandButton mit welchem ich das Excel-Sheet formatieren möchte. D.H. Breite der Spalten definieren. Breite der Zeilen definieren. Farben zuordnen etc. Jetzt ist bei dieser durchführung der Prozessor auf Volllast 2 GHZ AMD! Man kann bei der Durchführung zusehen. Es dauert für die 200 Zeilen ca. 15 Minuten!!!
Wie kann ich das beschleunigen gibt es spezielle Funktionen um exclusive Rechenpower zu erhalten. Bzw. was muss ich tun um es schneller zu bekommen ?
Vielen Dank im Voraus.
Gruß
Silvia

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Beim Formatieren sehr langsam

18.10.2006 14:42:24

Uduuh
AW: Beim Formatieren sehr langsam

18.10.2006 16:00:52

Silvia

AW: Beim Formatieren sehr langsam

18.10.2006 14:42:24

Uduuh

Hallo,
vielleicht hilft's:


Sub ttt()
GetMoreSpeed True
'Formatierung
GetMoreSpeed False
End Sub


Sub GetMoreSpeed(bYesNo As Boolean)
Application.ScreenUpdating = Not (bYesNo)
Application.EnableEvents = Not (bYesNo)
Application.Calculation = IIf(bYesNo, xlCalculationManual, xlCalculationAutomatic)
If Not bYesNo Then Calculate
End Sub

Gruß ausm Pott
Udo

AW: Beim Formatieren sehr langsam

18.10.2006 16:00:52

Silvia

Vielen Dank hat sehr geholfen.
Gruß
Silvia