Saper utilizzare le macro di Excel per imporre il ricalcolo di un foglio di lavoro assicura che le formule nelle cartelle di lavoro stanno producendo valori accurati. Excel calcola automaticamente le formule per impostazione predefinita, che può comportare lunghi tempi di elaborazione per le cartelle di lavoro con molte formule. Il passaggio a calcolo manuale risolve questo problema, ma crea il problema delle formule imprecise. Macro VBA di Excel può ripristinare, temporaneamente o definitivamente, il calcolo automatico. Uno dei vantaggi di utilizzo di macro per ricalcolare al contrario di riattivare l'opzione di calcolo automatico è che si possono scegliere esattamente quali celle per ricalcolare, che evita i ritardi di tempo creati da calcolo intero foglio di lavoro di it.

Istruzioni

1

Fare clic sul pulsante "Opzioni" del menu "File", quindi fai clic sul link di "Formule". Scegliere l'opzione "Manuale", quindi "OK" per chiudere la finestra di dialogo "Opzioni". Questo passaggio consente di disattivare il calcolo automatico, che ripristinerà la macro.

2

Digitare quanto segue nelle celle A1 e C1 del foglio di lavoro corrente: 5, 10, "= a1 * a2." Si noti che la formula in C1 è errata, dovuto la selezione dell'opzione manuale nel passaggio uno. La macro verrà ripristinato calcolo automatico.

3

Scegliere della scheda "Sviluppo" "Visual Basic" per entrare nell'ambiente di programmazione Visual Basic. Incollare il seguente programma nella finestra che appare. Questo programma utilizza l'oggetto "Range" per immettere i valori nelle due celle del foglio di lavoro diverso e una formula in un'altra cella. Il programma dispone di due istruzioni che costringono il foglio di lavoro corrente per aggiornare il suo calcolo. Il primo è "Application.Calculation = xlCalculationAutomatic." Questa istruzione imposta la proprietà di "Calcolo" dell'applicazione Excel stessa. Il secondo è quello di chiamare la funzione "Calcola" dell'oggetto "ActiveSheet". Questa istruzione indica solo il foglio attivo per calcolare, non l'intera cartella di lavoro.

Public Sub recalc()

' Inserire numeri in una cella

' Inserire un calcolo che dipende da quei numeri

' Forzare ricalcolo

Application.Calculation = xlCalculationAutomatic

Range("a1") = 5

Range("a2") = 10

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

ActiveSheet

End Sub

4

Premere "F5" per eseguire il programma.

5

Fare clic sull'icona "Excel" nella 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 cellule di due principali del foglio di lavoro, è accurato.