Saper utilizzare le macro di Excel per forzare il ricalcolo di un foglio di lavoro assicura che le formule nelle cartelle di lavoro stanno producendo valori precisi . Excel calcola automaticamente le formule per impostazione predefinita, che può portare a tempi di lavorazione lunghi per le cartelle di lavoro con molte formule . Passaggio a calcolo manuale risolve questo problema , ma crea il problema di formule imprecise . Macro VBA di Excel possono ripristinare , temporaneamente o permanentemente , il calcolo automatico . Un vantaggio di utilizzare le macro per ricalcolare al contrario di riattivare l'opzione di calcolo automatico è che si può scegliere quali celle esattamente per ricalcolare , che evita i ritardi creati calcolando en intero foglio di lavoro . Istruzioni
1

Fare clic sul pulsante "Opzioni" del menu "File" , quindi fare clic sul collegamento " formule" . Selezionare l'opzione "Manuale" , poi su "OK" per chiudere la finestra di dialogo "Opzioni" . Questo passaggio si calcolo automatico, che la macro ripristinerà
2

Digitare quanto segue nella celle da A1 a C1 del foglio di lavoro corrente : . 5, 10 , . " = A1 * A2" Si noti che la formula in C1 non è corretta , dovuta alla selezione dell'opzione manuale al punto uno . La macro ripristinerà il calcolo automatico .
3

Fare clic sul pulsante della scheda " sviluppatori" " Visual Basic " per entrare nell'ambiente di programmazione Visual Basic . Incolla il seguente programma nella finestra che appare. Questo programma utilizza l'oggetto " Gamma " per inserire i valori in due celle del foglio di lavoro differenti , e una formula in un'altra cella . Il programma ha due affermazioni che costringono il foglio di lavoro corrente per aggiornare il suo calcolo . Il primo è " Application.Calculation = xlCalculationAutomatic . " Questa istruzione imposta la proprietà "Calcolo " dell'applicazione Excel stesso . La seconda è quella che chiama la funzione "Calcola " dell'oggetto " ActiveSheet " . Questa dichiarazione dice solo il foglio attivo per il calcolo , non l' intera cartella di lavoro .

Public Sub recalc ( ) per

'Inserire numeri in una cella

' Immettere un calulation che dipende su quei numeri

'Forza ricalcolo

Application.Calculation = xlCalculationAutomatic

Range ("A1 " ) = 5

Range (" A2" ) = 10

Range (" A3" ) . Formula = " = A1 * A2"

ActiveSheet.Calculate

End Sub
4

Press "F5" per eseguire il programma .
5

Fare clic sull'icona "Excel" sulla barra delle applicazioni di Windows per tornare a Excel . Si noti che la cella A3 ha una funzione che richiede il calcolo aggiornato , e che il risultato del calcolo , il prodotto delle prime due celle del foglio di lavoro , è accurato .