【怎么改变Excel的显示位置】在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的显示位置 。
推荐阅读
- Excel获取指定路径的文件名 vba代码
- 怎么隐藏Excel窗口
- Excel怎么获取指定文件名
- 怎么将Excel窗口设置为全屏显示
- 怎么使Excel取消键无效
- Excel中VBA框架类关键字相关介绍和说明
- 怎么隐藏Excel状态栏
- Excel VBA教程：秒杀汇总几十张销售通知单
- 淘宝特价商品不发货怎么办？可以退货吗？
- 注册微信号一直显示系统升级怎么回事？