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 ‘顯示打印文檔的對話框