vba怎么限定工作簿窗口大小
来源:网络收集 点击: 时间:2024-03-02打开Excel,在开发工具栏里点击Visual Basic。

在Visual Basic里插入一个新模块,创建一个sub过程。

在sub过程中输入:
Dim sngwidth As Single, sngheight As Single
Dim rngview As Range
Set rngview = Range(a1:i9)
With ActiveWindow
.DisplayHeadings = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
.WindowState = xlNormal
sngwidth = .Width - .UsableWidth
sngheight = .Height - .UsableHeight
.Width = rngview.Width + sngwidth
.Height = rngview.Height + sngheight
.ScrollRow = 1
.ScrollColumn = 1
.ActiveSheet.ScrollArea = rngview.Address
.EnableResize = False
End With
Set rngview = Nothing
点击运行可以显示一个a1:i9区域窗口。

版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.1haoku.cn/art_215591.html