Wissen, wie man Excel -Makros zu zwingen Neuberechnung eines Arbeitsblatts wird sichergestellt, dass die Formeln in Ihren Arbeitsmappen produzieren genaue Werte . Excel Formeln berechnet automatisch eingestellt, was in langen Bearbeitungszeiten für Arbeitsmappen mit vielen Formeln führen. Umschalten auf manuelle Berechnung löst dieses Problem , sondern schafft das Problem der ungenauen Formeln . Excel VBA Makros wiederherstellen können , vorübergehend oder dauerhaft , automatische Berechnung . Ein Vorteil bei der Verwendung von Makros neu zu berechnen , im Gegensatz zu wieder aktiviert die automatische Berechnung Option ist, dass Sie genau , welche Zellen zu berechnen , die die Zeitverzögerungen durch Berechnung en gesamte Arbeitsblatt erstellt vermeidet wählen . Anleitung
1

Klicken Sie auf das Menü "Datei" die Schaltfläche "Optionen" und dann auf die " Formeln" -Link. Klicken Sie auf die Option "Manuell" , dann " OK ", um das Dialogfeld "Optionen" zu schließen. Mit diesem Schritt wird die automatische Berechnung, die Ihr Makro wird wieder
2

Geben Sie den folgenden in die Zellen A1 bis C1 des aktuellen Arbeitsblatt : . 5, 10, " . = A1 * a2 " Beachten Sie, dass die Formel in C1 falsch ist , aufgrund Ihrer Auswahl der manuellen Option in Schritt eins . Das Makro wird wieder automatische Berechnung .
3

Klicken Sie auf die Registerkarte "Entwicklertools" der " Visual Basic " -Taste, um den Visual Basic- Programmierumgebung geben . Fügen Sie den folgenden Programm in dem Fenster , das erscheint. Dieses Programm verwendet die "Range" -Objekt , um Werte in zwei verschiedenen Zellen im Arbeitsblatt geben , und eine Formel in eine andere Zelle . Das Programm hat zwei Aussagen, die das aktuelle Arbeitsblatt zu seiner Berechnung aktualisieren erzwingen. Die erste ist " Application.Calculation = xlCalculationAutomatic . " Diese Anweisung setzt die "Berechnung" Eigenschaft der Excel-Anwendung selber. Die zweite ist die, den Aufruf der "Berechnen "-Funktion des " ActiveSheet " Objekt . Diese Aussage sagt nur das aktive Blatt zu berechnen , nicht die gesamte Arbeitsmappe .

Public Sub recalc ()

' Zahlen in einer Zelle

Enter' ein Berechnungstool , das hängt eingeben Aus diesen Zahlen

' Kraft Neuberechnung

Application.Calculation = xlCalculationAutomatic

Range ( "a1" ) = 5

Range ( "A2" ) = 10

Range ( "A3" ) . Formula = " = a1 * a2 "

ActiveSheet.Calculate

End Sub
4

Press "F5 ", um das Programm auszuführen.
5

Klicken Sie auf den "Excel "-Symbol auf der Windows-Taskleiste , um zu Excel zurückzukehren. Beachten Sie, dass die Zelle A3 eine Funktion, die aktualisierte Berechnung erfordert hat , und dass das Ergebnis der Berechnung ist das Produkt aus dem Arbeitsblatt Top zwei Zellen , genau.