修改excel的缩放显示占比

在excel 中 右下角有个 缩放大小, 在表格内容较多的情况下 经常会用到

如果使用vba的话 类似这样就可以了

[code]

Sub set_Zoom()
Dim ws As Worksheet

Set ws = ActiveWorkbook.Worksheets(1)
ws.Select

' 将此属性设为 True，可将窗口大小设置成与当前选定区域相适应的大小。
ActiveWindow.Zoom = True
' 它代表窗口的显示大小，以百分数表示（100 表示正常大小，200 表示双倍大小，以此类推）
ActiveWindow.Zoom = 70

End Sub

[/code]

 如果使用 python xlwings 的话

 [code]

app = xw.App(visible=False, add_book = False)

# book_path = 你的表格路径

wb = app.books.open(book_path)

wb.sheet1.activate()

wb.app.api.ActiveWindow.Zoom = 70

[/code]

 

这样就可以啦