vba有没有能快速从sub头部到尾部的快捷键？

renahu · 发表于 2022-12-1 09:49

我的sub很长，移动起来不能快速精准定位

f8b1987 · 发表于 2022-12-1 10:36

本帖最后由 f8b1987 于 2022-12-1 10:37 编辑

不考虑搜索吗？输入end sub查找。还有快捷键CTRL+↓，可以快速条到下一个sub开头位置，相当于你的结尾了

lss001 · 发表于 2022-12-1 10:42

本帖最后由 lss001 于 2022-12-1 11:39 编辑

'上下移动快捷键:Ctrl + ↑↓箭头
'左右移动快捷键:Ctrl + ←→箭头

Sub 移动到指定位置()
Application.VBE.ActiveCodePane.SetSelection 1, 1, 1, 1 '移动到指定位置/1表示移动到头部
r = Application.VBE.ActiveCodePane.CodeModule.CountOfLines '总行
Application.VBE.ActiveCodePane.SetSelection r, 1, r, 1 '移动到尾部
End Sub

renahu · 发表于 2022-12-1 13:51

lss001 发表于 2022-12-1 10:42
'上下移动快捷键:Ctrl + ↑↓箭头
'左右移动快捷键:Ctrl + ←→箭头

还可以这样，这四个数分别代表什么？

lss001 · 发表于 2022-12-1 15:55

本帖最后由 lss001 于 2022-12-1 16:00 编辑

renahu 发表于 2022-12-1 13:51
还可以这样，这四个数分别代表什么？

开始行,开始列，结束行,结束列
开始结束相同表示跳转对应Ctrl+箭头
开始结束不同表示选择对应Shift+箭头

		自动登录	找回密码
密码			免费注册

[求助] vba有没有能快速从sub头部到尾部的快捷键？

评分

评分