Mit den beiden Methoden starte am Anfang einer weiteren Methode das beim Eintragen von Werten in das Datenblatt keine Formeln berechnet werden und diese Methode schneller durchläuft.
Am Ende setze ich es mit "Makrobremsen_zurücksetzen" zurück.
Aber ich bekomme es nicht hin dass dann die Formeln auf dem Datenblatt aktualisiert werden.
Ich habe schon einige Dinge aus dem Netz versucht. Aber ich bekomme es leider nicht hin.
Kann mir jemand helfen?
Eigentlich müssen nur die Werte/Formeln aus einem Bereich aktualisiert werden (Bsp. B20:B40)
Liebe Grüße Tobi
Sub Makrobremsen_einschalten()
With Application
.Calculation = xlCalculationManual
.ScreenUpdating = False
.EnableEvents = False
End With
End Sub
Sub Makrobremsen_zurücksetzen()
Dim StatusCalc As Long
With Application
.Calculation = StatusCalc
.ScreenUpdating = True
.EnableEvents = True
End With
Application.Calculation = xlCalculationAutomatic
End Sub