AW: Geschwindigkeitsproblem beim Formelberechnen
13.10.2003 21:05:18
Reinhard
Hi Sven,
mit Alt-F11 in den Editor wechseln,
dann links doppelt auf DieseArbeitsmappe klicken und rechts
Private Sub Workbook_Open()
Application.Calculation = xlCalculationManual
End Sub
reinkopieren, dann lnks alle gewünschten Tabellen (Tabelle1,tabelle2) auch doppelt anklicken und eingeben:
Private Sub Worksheet_Change(ByVal Target As Range)
Application.SendKeys "{F9}"
End Sub
Dann Editor schließen.
Das Makro in DieseArbeitsmappe schaltet die automatische Berechnung für die ganze Arbeitsmappe aus.
Die Makros in den einzelenen Tabellen senden an Excel F9, es wird also berechnet, aber nur diese eine Tabelle und nur wenn sich da was geändert hat, also bei jeder Zelleneingabe.
Gruß
Reinhard