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

---

能够使工作表在计算机屏幕上显示得更大非常方便，尤其是在计算机显示屏较小的情况下。您可能还需要缩小以更好地查看整个工作表。

Excel 的缩放工具允许用户更改工作表的比例。如果希望分别查看更多或更少的工作表，可以使用缩放工具增加或减少放大倍数。

有一些鼠标和键盘快捷键可用于在 Excel 中放大和缩小工作表。其中一些快捷键是预装在 Excel 中的，而其他快捷键可以通过修改 Excel 选项编程到程序中。

在本教程中，我们将学习在 Excel 中放大或缩小工作表的不同方法。

使用缩放滑块缩放多个工作表

默认情况下，工作表以 100% 的缩放级别显示。但是，您可以使用缩放滑块根据需要将当前活动选项卡缩放至指定大小。

步骤 1

我们有以下包含多个工作表 Excel 表格，如下面的图像所示。

步骤 2

可以通过按住Ctrl键选择要批量调整缩放级别的工作表选项卡，当您沿适当方向拖动缩放滑块时，工作表将被缩放。请参见以下屏幕截图。

如果要选择所有选项卡，则首先在工作表选项卡栏中选择第一个选项卡，然后按住Shift键选择最后一个选项卡，最后拖动缩放滑块。

使用 VBA 缩放所有工作表

您还可以使用 VBA 编写的代码来解决此问题。

让我们看看下面提供的代码，它可以帮助您。

步骤 1

同时按下Alt+F11键打开Microsoft Visual Basic for Applications窗口。然后单击插入 > 模块。请参见下图。

步骤 2

然后在空白模块中添加以下 VBA 代码。

Sub ZoomSheets()
    Dim X As Long
    Dim xActSheet As Worksheet
    Set xActSheet = ActiveSheet
    For X = 1 To ThisWorkbook.Sheets.Count
        Sheets(X).Activate
        ActiveWindow.Zoom = 120
    Next
    xActSheet.Select
End Sub

您可以根据需要更改缩放级别。请参见下图。

步骤 3

然后通过按F5运行代码。运行代码后，您将看到工作表已缩放至 120%。请参见以下图像。

结论

在本教程中，我们解释了如何使用 VBA 代码以及缩放滑块将 Excel 中的所有选项卡缩放为相同大小。