如何在Excel中将所有选项卡缩放到同一大小？

默认情况下，工作表的缩放比例为100%，但您可以根据需要通过拖动缩放滑块将当前选项卡缩放到特定大小。然而，如何同时将工作簿中的所有选项卡缩放到相同的大小呢？

使用Ctrl或Shift键将所有选项卡缩放到同一大小

通过VBA将所有选项卡缩放到同一大小

使用Ctrl或Shift键将所有选项卡缩放到同一大小

要将工作簿中的所有或部分选项卡缩放到同一大小，您可以先选择工作表标签，然后进行缩放。

按住 Ctrl 键以批量选择您想要更改缩放级别的工作表标签，然后拖动缩放滑块。参见截图：

选择第一个选项卡并按住 Shift 键以选择工作表标签栏中的最后一个选项卡，然后拖动缩放滑块以更改它们的缩放级别。

使用 Kutools AI 解锁 Excel 魔法

• 智能执行：执行单元格操作、分析数据和创建图表——所有这些都由简单命令驱动。
• 自定义公式：生成量身定制的公式，优化您的工作流程。
• VBA 编码：轻松编写和实现 VBA 代码。
• 公式解释：轻松理解复杂公式。
• 文本翻译：打破电子表格中的语言障碍。

通过人工智能驱动的工具增强您的 Excel 能力。立即下载，体验前所未有的高效！

通过VBA将所有选项卡缩放到同一大小

如果您想使用VBA代码来解决此问题，以下代码可以帮助您。

1. 按 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2. 单击 插入 > 模块，复制并将代码粘贴到空白脚本中。

VBA：缩小或放大所有选项卡到指定大小

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. 按 F5 键运行，所有工作表选项卡的缩放级别都会批量更改为指定的百分比。