VBA修改視窗為最小化、最大化代碼

 　　以下的VBA代碼，均於Excel中的VBA有關，是用來修改應用程式的相關屬性的。代碼收藏如下。

　　Application.WindowState = xlMinimized ‘視窗最小化

　　Application.WindowState =xlMaximized　最大化

　　Application.WindowState =xlNormal　　為正常

　　Application.Cursor = xlIBeam ‘設定游標形狀為Ⅰ字形

　　Application.Cursor = xlWait　　為沙漏(等待)形

　　Application.Cursor = xlNormal　　為正常

　　Application.StatusBar = "福士電腦" ’在地址欄中顯示文本

　　Application.Caption= "福士電腦" 　修改標題列的文字.

　　其它的知識

　　Application.TemplatesPath ‘擷取活頁簿模板的位置

　　Application.CalculateFull ’重新計算所有開啟的活頁簿中的資料

　　Application.RecentFiles.Maximum = 3 ’將最近使用的文檔列表數設為3

　　Application.RecentFiles(6).Open ’開啟最近開啟的文檔中的第6個文檔

　　Application.AutoCorrect.AddReplacement "good", "福士電腦" ’自動將輸入的"good"更正為"福士電腦"

　　Application.Dialogs(xlDialogPrint).Show ‘顯示列印文檔的對話方塊