¿Cómo acercar todas las pestañas en un tamaño en Excel?

De forma predeterminada, las hojas tienen un zoom del 100%, pero puede hacer zoom en la pestaña actual a un tamaño específico según lo necesite arrastrando el control deslizante de zoom. Sin embargo, ¿cómo puede hacer zoom en todas las pestañas de un libro al mismo tamaño al mismo tiempo?

Amplíe todas las pestañas en un tamaño usando Ctrl o Shift

Zoom todas las pestañas en un tamaño por VBA

---

Amplíe todas las pestañas en un tamaño usando Ctrl o Shift

Para hacer zoom en todas o algunas pestañas en un tamaño de un libro, puede seleccionar las pestañas de la hoja primero y luego hacer zoom.

Mantener Ctrl para seleccionar las pestañas de la hoja cuyos niveles de zoom desea cambiar de forma masiva y luego arrastre el control deslizante de zoom. Ver captura de pantalla:

Seleccione la primera pestaña y mantenga cambio para seleccionar la última pestaña en la barra de pestañas Hoja, luego arrastre el control deslizante de zoom para cambiar sus niveles de zoom.

---

Zoom todas las pestañas en un tamaño por VBA

Si desea usar el código VBA para resolverlo, el siguiente código puede ayudarlo.

1. Prensa Alt + F11 claves para habilitar el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic en recuadro > Módulo, copie y pegue el código en el script en blanco.

VBA: encoge o agranda todas las pestañas en un tamaño

Sub DbZoom()
'UpdatebyExtendoffice20171215
    Dim I As Long
    Dim xActSheet As Worksheet
    Set xActSheet = ActiveSheet
    For I = 1 To ThisWorkbook.Sheets.Count
        Sheets(I).Activate
        ActiveWindow.Zoom = 150
    Next
    xActSheet.Select
End Sub

3. Prensa F5 para ejecutar, y todos los niveles de zoom de las pestañas de la hoja se han cambiado al porcentaje especificado en masa.