VBA代码编辑器中显示行号

香川群子 · 发表于 2013-5-9 12:46

crazy0qwer 发表于 2013-5-9 10:11
呵呵其实这样做是没有任何意义的。

我想楼主需要的是这样的功能：

本质上代码是不需要行号的。

楼主可能是初学者，希望通过行号来辅助记住对自己来说像天书一样的代码吧。

其实这个阶段应该很快就可以过去的。
对代码有一定了解后，完全不需要去关心代码的行位置。

清风_ll · 发表于 2013-5-13 16:25

本帖最后由清风_ll 于 2013-5-13 16:26 编辑

bluexuemei 发表于 2013-5-9 08:14
怎样添加，请版主指教。

不好意思，这段时间较忙。。。。。。
请参考一下代码，创建工具后，在VBE窗口的“编辑”工具栏中添加一个按钮，如图：

点击按钮，可为当前VBE活动代码模块的代码自动添加行号，如图。

（注：对本工作簿代码模块操作时可能会产生错误。）

定制自己的VBE小工具.rar (15.33 KB, 下载次数: 209)

清风_ll · 发表于 2013-5-13 16:29

本帖最后由清风_ll 于 2013-5-13 16:32 编辑

为保留原格式，第25行代码的VBA.Ltrim()函数应删除。{:soso_e113:}

yf_home · 发表于 2013-9-16 19:45

清风_ll 发表于 2013-5-13 16:25
不好意思，这段时间较忙。。。。。。
请参考一下代码，创建工具后，在VBE窗口的“编辑”工具栏中添加一 ...

清风版主，非常好的工具，提两个建议：
1，添加一次性，再点击按钮，应有相应的提示：已经有行号，确定要再添加？
2，应该增加删除功能，要不然添加了，想要删除，那就要手动了，不方便。

谢谢。

yingyongdaquan · 发表于 2013-12-19 10:45

楼主的问题在论坛上已经有了答案了，见下面的帖子

如何在VBA代码中添加行号？
http://club.excelhome.net/thread-566603-1-1.html

objector2008 · 发表于 2014-3-14 14:54

请问10楼，如何使VBA中的代码显示和在记事本里一样的效果？
D:\360安全浏览器下载\forum.jpg

z.l1978@163.com · 发表于 2014-5-15 11:19

香川群子发表于 2013-5-9 00:05
是这个吧……空行也算一行。

If UBound(B2) < 1 Then GoTo

要从第３８行第１列开始运行，这个ＧＯto后面怎么编写啊，
If UBound(B2) < 1 Then GoTo 38:
上面说我编写错误，标签未定义，这个怎么解决啊

z.l1978@163.com · 发表于 2014-5-15 11:24

香川群子发表于 2013-5-9 00:05
是这个吧……空行也算一行。

If UBound(B2) < 1 Then GoTo 38:
这个分支点已经解决，现在就是这个判断语句中，Ｂ２数组如果是空值　，这个怎么判断啦，运行提示下标越界

tq00pdp · 发表于 2015-11-11 20:04

复制代码

soar.xiaolei · 发表于 2016-7-27 11:12

crazy0qwer 发表于 2013-5-9 10:11
呵呵其实这样做是没有任何意义的。

我想楼主需要的是这样的功能：

麻烦问一下，这个记事本是怎么弄出来的，谢谢

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

[求助] VBA代码编辑器中显示行号