Zu viele Formeln - Tabelle langsam - was tun?

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Marc,
gehe in den VBA-Editor (Alt+F11) und klicke im VBA-Projekt Deiner Exceldatei im Ordner "Microsoft Excel Objekte" doppelt auf "DieseArbeitsmappe" und füge folgenden Code ein:


Private Sub Workbook_Open() 'Berechnung wird beim Öffnen der Datei auf Manuell gesetzt
Application.Calculation = xlCalculationManual
End Sub


Private Sub Workbook_BeforeClose(Cancel As Boolean) 'Berechnung wird beim Schließen der Datei  _
auf Automatisch gesetzt
Application.Calculation = xlCalculationAutomatic
End Sub


Private Sub Workbook_Activate() 'Berechnung wird beim Wechsel zu dieser Exceldatei auf Manuell  _
gesetzt
Application.Calculation = xlCalculationManual
End Sub


Private Sub Workbook_Deactivate() 'Berechnung wird beim Wechsel zu einer andern Exceldatei auf  _
Automatisch gesetzt
Application.Calculation = xlCalculationAutomatic
End Sub


Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
ActiveSheet.Calculate 'Bei Änderungen in Zellen wird das aktuelle Blatt neu berechnet
End Sub

Dann sollte alles wie gewünscht klappen!
Viele Grüße
Martin

Hi
beim Umgang mit grossen Datenmengen kann man folgende Vorgehensweisen verwenden:
1. viele SVERWEISE in einer Zeile, die den gleichen Suchbegriff verwenden
hier kann es Sinnvoll sein, die Zeilen-Nr mit der Vergleichsfunktion zu ermitteln und die Daten dann mit der INDEX-Funktion aus der anderen Tabelle auszulesen. Dadurch wird die zeitaufwendige Vergleichsfunktion nur ein einer Spalte benötigt und nicht in vielen.
2. Formeln werden nur bei Datenaktualisierung benötigt
bei vielen SVerweisen ist es so, daß diese nur benötigt werden, wenn in der Quelldatei neue Daten ankommen.
Wenn dies nicht permanent, sondern nur in grösseren Zeitabständen passiert, kann es sinnvoll sein, die SVERWEIS-Formeln mit KOPIEREN und INHALTE EINFÜGEN - WERTE durch Werte zu ersetzen.
dadurch steigt die Verarbeitungsgeschwindigkeit enorm.
steht eine Datenaktualisierung an, müssen die Formeln wieder hergestellt werden, daß mache ich dadurch, daß ich die Formeln in der ersten Zeile stehen lasse, dann brauche ich sie nur per Mausklick nach unten kopieren.
die Wartezeit beim Daten aktualisieren bleibt dann zwar bestehen, aber das Normale Arbeiten mit den Daten geht wesentlich schneller (zusätzlich sollten, die Formeln noch an einer anderen Stelle gesichtet werden, denn manchmal vergiisst man, beim WERTE EINFÜGEN, die erste Datenzeile wegzulassen.
3. Schnellen SVERWEIS und VERGLEICH verwenden.
die beiden Funktionen haben 2 Varianten ,die über den letzen Parameter gesteuert werden (beim SVerweis der 4, beim Vergleich der 3.)
ist dieser =0 oder FALSCH, dann haben wir die langsame Variante, ist dieser =1 oder WAHR, dann haben wir die schnelle.
beim Arbeiten mit der Schnellen Variante muss man allerdings folgendes beachten:
- die Quelldaten müssen nach dem Suchbegriff (1. Spalte der Suchmatirx) aufsteigend sortiert sein.
- es gibt keine Fehlermeldung, wenn der Suchbegriff nicht gefunden wird, stattdessen wird der nächstkleinere Wert verwendet.
Sollte bei nicht vorhandenem Suchbegriff eine Fehlermeldung erforderlich sein, dann kann man dies Abbprufen, in dem man einen SVERWEIS auf die 1. Spalte der Suchmatrix durchführt und den Rückgabewert mit dem Suchbegriff vergleicht:


=Wenn(A1=SVerweis(A1;Tabelle2!A:D;1;1);SVerweis(A1;Tabelle2!A:D;3;1);"Nicht gefunden")

auch mit dieser Zusatzprüfung ist der Schnelle SVerweis dem langsamen deutlich überlegen und sollte bei grösseren Datenmengen auf jeden Fall verwendet werden.
Gruss, Daniel

Beliebteste Forumthreads (12 Monate)

Zu viele Formeln - Tabelle langsam - was tun?

9 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

9
Beiträge zum Forumthread

Beiträge zu diesem Forumthread