Automatische Kalkulation ausschalten
Timo
ich habe eine relativ große Excel Datei, wo ich beim Öffnen der Datei die automatische Kalkulation ausgeschaltet habe und beim Schließen diese sich wieder einschaltet. Dies funktioniert hierüber:
Private Sub Workbook_Open()
With Application
.Calculation = xlManual
.CalculateBeforeSave = False
End With
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Calculation = xlAutomatic
End Sub
Danke,
timo
Anzeige