excel中使用vba讓工作薄最大化的方法

1、首先我們打開一個工作樣表作為例子。

2、有個最簡單的方法是在打開工作薄后將工作薄最大化，馬上關(guān)閉工作薄，當再次重新打開時，工作薄就會以最大化的方式打開。但是某些時候，我們會發(fā)現(xiàn)無論怎么修改都無法完成這一目的。

3、使用alt+f11組合快捷鍵進入vbe編輯器，插入一個新的模塊，并在模塊中輸入以下代碼：Application.WindowState = xlMaximizedActiveWindow.WindowState = xlMaximized

4、操作方法是這樣的，我們進入vbe編輯器后，在工程屬性欄中找到thisworkbook，點擊它。

5、接下來在編輯器屬性欄中選擇workbook選項，并在動作屬性欄中選擇open，作用是是指當對工作薄執(zhí)行打開操作時，運行所指定的過程。

6、其格式是這樣的。

Private Sub Workbook_Open()

Application.WindowState = xlMaximized

ActiveWindow.WindowState = xlMaximized

End Sub

Application和ActiveWindow在這里是同一個對象，windowstate是其屬性。 xlMaximized是賦值。

7、保存后當我們再次打開這個工作薄，它都會執(zhí)行將工作薄最大化的過程，來保證我們所需要的結(jié)果。

相關(guān)推薦：

excel中怎么使用Vba批量刪除指定文件夾下的所有文件?

excel怎么利用vba實現(xiàn)批量套打快遞單批量打印單據(jù)?

excel怎么使用vba解決百錢買百雞的問題?