Saber utilizar las macros de Excel para forzar recálculo de una hoja de trabajo se asegura de que las fórmulas de los libros están produciendo valores precisos . Excel calcula fórmulas automáticamente de forma predeterminada , lo que puede dar lugar a largos tiempos de procesamiento para los libros con muchas fórmulas . El cambio a cálculo manual resuelve este problema , sino que crea el problema de fórmulas inexactas . VBA Macros de Excel pueden recuperar , ya sea temporal o permanentemente , el cálculo automático. Una ventaja de usar macros para volver a calcular en lugar de volver a habilitar la opción de cálculo automático es que usted puede elegir exactamente qué células para volver a calcular , lo que evita los retrasos creados por calcular en toda hoja de cálculo. Instrucciones
1

Haga clic en " Opciones" del menú " Archivo" , luego haga clic en el enlace " fórmulas" . Haga clic en la opción "Manual", luego en "Aceptar " para cerrar el cuadro de diálogo " Opciones". Este paso activa el cálculo automático de apagado , que la macro se restaurará
2

escriba lo siguiente en las celdas A1 a C1 de la hoja de trabajo actual : . 5 , 10 , "= a1 * a2 . " Observe que la fórmula en C1 es incorrecta , debido a la selección de la opción manual en el paso uno . Su macro restaurará cálculo automático .
3

clic el botón de la pestaña " desarrolladores" "Visual Basic " para entrar en el entorno de programación Visual Basic . Pega el siguiente programa en la ventana que aparece. Este programa utiliza el objeto "Range" para introducir los valores en dos celdas de la hoja diferentes , y una fórmula en otra celda . El programa tiene dos sentencias que obligan la hoja de trabajo actual para actualizar su cálculo. La primera es " Application.Calculation = xlCalculationAutomatic . " Esta declaración establece la propiedad " cálculo" de la propia aplicación Excel . La segunda es la llamada a la función "Calcular " del objeto " ActiveSheet " . Esta declaración dice sólo la hoja activa de calcular, no todo el libro .

Public Sub recálculo ()

'ENTER números en una celda

' Introduzca un calulation que depende en los números

' Fuerza recálculo

Application.Calculation = xlCalculationAutomatic

Range (" a1" ) = 5

Range (" A2 ") = 10

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

ActiveSheet.Calculate

End Sub
4

Press "F5 " para ejecutar el programa.
5

clic en el icono " Excel " en la barra de tareas de Windows para volver a Excel. Observe que la celda A3 tiene una función que requiere el cálculo actualizado , y que el resultado del cálculo, el producto de los dos principales células de la hoja de cálculo , es exacta.