vba窗体大小设置

方法/步骤

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窗体大小设置，如果你看到此处请一定要收藏哦！