1、關閉Excel應用程式2、在登錄檔[HKEY_CURRENT_USER\Software\Microsoft\VBA\6.0\Common]鍵下儲存著VBE的各種設定引數，其中有一個名為Dock的二進位制值，該值儲存著VBE視窗中各窗格的各種資訊，雙擊它並刪除裡面的資料，鍵值將顯示為"(長度為0的二進位值)"，重新開啟Excel，進入VBE您將發現窗格已經恢復預設設定了。當然您也可以刪除該鍵，再新建一個名為Dock的二進位制值，鍵值為預設就可以了。事實上刪除後不需要重建該鍵也可以。該方法在2003中測試透過

使用以下程式碼獲取螢幕解析度：

Declare Function GetSystemMetrics32 Lib "user32" _

Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long

Sub DisplayMonitorInfo()

Dim X As Long, Y As Long

X = GetSystemMetrics32(0) " 寬度（畫素）

Y = GetSystemMetrics32(1) " 高度（畫素）

End Sub

然後再根據高寬計算並設定窗體及各控制元件大小即可