En el suguiente video muestro como con la propiedad ScreenUpdatin del objeto Application nos permite apagar la actualización de pantalla para ejecutar una macro que se lleve muchos pasos, y en cambio sólo muestre el resultado final.
En el artículo Lista incompleta de tips para programar macros en Excel sugiero el uso de dicha propiedad con el objeto de ahorrar memoria y hacer nuestras macros más eficiente.
Código utilizado en el video
Private Sub CommandButton1_Click() 'Con actualización de pantalla Range("A2").Select Do While ActiveCell <> "" ActiveCell.Value = ActiveCell.Value & Contador Contador = Contador + 1 ActiveCell.Offset(1, 0).Select Loop Range("A2").Select End Sub Private Sub CommandButton2_Click() 'Sin actualización de pantalla Range("D2").Select Application.ScreenUpdating = False Do While ActiveCell <> "" ActiveCell.Value = ActiveCell.Value & Contador Contador = Contador + 1 ActiveCell.Offset(1, 0).Select Loop Range("D2").Select Application.ScreenUpdating = True End Sub
Video

Pingback: Pausar actualización de pantalla en Excel al ejecutar una macro con ScreenUpdating | MVPs de LATAM