Private Sub Workbook_SheetActivate(ByVal Sh As Object)ActiveWindow.Zoom = 110End Sub这个是 把你打开的这个工作簿 的 当前 工作表 的显示比例 调整为110% thisworkbook 的 sheetactiveate 事件……如果你想针对特定的工作表 那么 你就把中间的代码 放在 对应的工作表的 activate 事件中……
设置view属性
ActiveWindow.Zoom=110