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窗体大小设置》对你有帮助，请点赞、收藏，并留下你的观点哦！