以定义的缩放级别设置所有的Excel工作表
我有超过二十张Excel工作簿(文件)。 是否有一些代码片段或我可以申请/使用的命令,以便所有表可以重置,让我们说85%缩放级别?
Sub SetZoom() Dim ws As Worksheet For Each ws In Worksheets ws.Select ActiveWindow.Zoom = 85 //change as per your requirements Next ws End Sub
顺便说一句,如果您只需使用选项卡在工作簿中select所有工作表,则可以将缩放比例设置为85%,并将应用于所有工作表