vba窗体大小设置
TIPS:本文共有 654 个字,阅读大概需要 2 分钟。
方法/步骤
1/3分步阅读
打开Excel,在开发工具栏里点击Visual Basic。
2/3
在Visual Basic里插入一个新模块,创建一个sub过程。
3/3
在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区域窗口。
如果觉得《vba窗体大小设置》对你有帮助,请点赞、收藏,并留下你的观点哦!