在Excel VBA中，如果需要改變Excel的顯示位置以方便用戶的操作，可通過VBA設置窗口與左邊界和頂端的距離來改變Excel的顯示位置。Excel2003可通過VBA宏改變Excel的顯示位置。
改變Excel的顯示位置的方法：
首先按“Alt+F11”組合鍵，Excel2003打開代碼編輯器，單擊“插入”菜單-“模塊”，雙擊插入的模塊，在右側的代碼窗口中輸入：
Sub Excel_Partner()
Dim myWState As Long, myTop As Double, myLeft As Double
With Application
myWState = .WindowState ‘獲取當前的窗口狀態
.WindowState = xlNormal ‘將窗口設置為一般顯示
myTop = .Top ‘獲取當前窗口的頂部位置
myLeft = .Left ‘獲取當前窗口的左側位置
.Top = .Top + 50 ‘設定窗口的頂部位置
.Left = 100 ‘設定窗口的左側位置
If MsgBox("Excel窗口的顯示位置已經改變!" & vbCrLf _
& "要恢復為原來的狀態嗎?", vbQuestion + vbYesNo) = vbYes Then
.Top = myTop ‘恢復窗口的頂部位置
.Left = myLeft ‘恢復窗口的左側位置
.WindowState = myWState ‘恢復窗口的顯示狀態
End If
End With
End Sub
按F5運行鍵運行程序，即可改變Excel的顯示位置。
