1、打开Excel，在开发工具栏里点击Visual Basic。
2、在Visual Basic里插入一个新模块，创建一个sub过程。
3、在sub过程中输入：Dim sngwidth As Single, sngheight As SingleDim rngview As RangeSet rngview = Range("a1:i9")With ActiveWindow.DisplayHeadings = False.DisplayHorizontalScrollBar = False.DisplayVerticalScrollBar = False.DisplayWorkbookTabs = False.WindowState = xlNormalsngwidth = .Width - .UsableWidthsngheight = .Height - .UsableHeight.Width = rngview.Width + sngwidth.Height = rngview.Height + sngheight.ScrollRow = 1.ScrollColumn = 1.ActiveSheet.ScrollArea = rngview.Address.EnableResize = FalseEnd WithSet rngview = Nothing点击运行可以显示一个a1：i9区域窗口。
