Wie berechnet man zellwerte in vba?
Standardmäßig berechnet Excel in Excel jedes Mal, wenn Sie einen Zellenwert ändern, alle Zellen neu, die eine Berechnungsabhängigkeit von dieser Zelle haben. Wenn Sie jedoch VBA verwenden, haben Sie die Möglichkeit, es auf manuell umzustellen, wie wir es in Excel tun.
Mit der VBA-Berechnungsmethode
Sie können die Berechnung wie folgt auf manuell umstellen, bevor Sie mit dem Code beginnen.
Application.Calculation = xlManual
Wenn Sie diesen Code ausführen, wird die Berechnung auf manuell umgestellt.
Und am Ende des Codes können Sie mit der folgenden Codezeile auf automatisch umstellen.
Application.Calculation = xlAutomatic
Sie können die Berechnung wie folgt verwenden.
Sub myMacro() Application.Calculation = xlManual 'your code goes here Application.Calculation = xlAutomatic End Sub
Jetzt berechnen (alle geöffneten Arbeitsmappen)
Wenn Sie nur alle geöffneten Arbeitsmappen neu berechnen möchten, können Sie die unten beschriebene Methode „Berechnen“ verwenden.
Calculate
Verwenden Sie die Berechnungsmethode für ein Blatt
Auf folgende Weise können Sie alle Berechnungen für alle neu berechnen
ActiveSheet.Calculate Sheets("Sheet1").Calculate
Die erste Codezeile führt eine Neuberechnung für das aktive Blatt durch und die zweite Zeile führt dies für „Blatt1“ durch, aber Sie können das Blatt ändern, wenn Sie möchten.
Berechnen Sie für einen einzelnen Bereich oder eine einzelne Zelle
Ebenso können Sie alle Berechnungen für einen bestimmten Bereich oder eine einzelne Zelle wie folgt neu berechnen.
Sheets("Sheet1").Range("A1:A10").Calculate Sheets("Sheet1").Range("A1").Calculate