需求

有时候，有创作科技图书的需求，可能就要用代码的讲解，而讲解代码时，为了方便起见，不免要给代码边行号。

但是，Word本身带的行号功能，非常不太好用，而手工敲写编号，一是容易错，而是工作量太大。所以很有必要编写一个自动编号的宏程序。

宏代码是这样的

其实，这样的宏写过很多次，也用过很多次，每次用过后，代码都不知道放到哪里去了，找半天，费了很多功夫。所以这里把代码放到博客里，这样就容易找到，也给其他有需要的同人，一个借鉴。

宏代码块

首先需要创建一个宏，如何来做呢？以Word 2010为例，在工具栏中，选择“视图”，点击“宏”，如下图所示。

然后点击【查看宏】：

在弹出的对话框中，点击【创建】。

在VBA的代码区写下如下代码：

Sub HangHao()
Dim parag As Paragraph
Dim nLineNum: nLineNum = 0
Dim selRge As Range
Set selRge = Selection.Range
For Each parag In Selection.Paragraphs
nLineNum = nLineNum + 1
selRge.Paragraphs(nLineNum).Range.InsertBefore (Format$(nLineNum, "00") & "   ")
Next
End Sub

写完后，点击保存，退出VBA代码区。

为了经常能用到这个宏，我们就需要在Word【文件】->【选项】中，找到【快速访问工具栏】，把这个宏取个好听的名称，并配一个图标，最后，它就乖乖滴出现在快速启动栏中。过程如下图所示。

实验结果

实验前，原始代码是没有行号的：

点击自己设计的宏图标，使用宏后的效果如下：

搞定，打完收工。

这里写得比较简略，主要是给自己留个备份，省得自己下次想用，不是忘了，就是找不到。

利用“宏”来为Word中的代码编写行号相关推荐

IDE(9)——VS系列(9)——如何设置vs2019中显示代码的行号
1.打开vs2019,点击"工具"里的"选项". 2.点击"选项"里的"文本编辑器",点击"C#", ...
在WORD中显示代码的格式
v0.0 使用pygments+Tkinter,本来想打开软件后,将代码粘到左边,然后点一下按钮,右边就出来格式,但最后使用的html的格式,我找了一下午也没找到tkinter怎么内嵌一个html,所 ...
【经验分享】如何优雅的在 Microsoft word中插入代码
目录一.借助工具二.使用步骤三.另辟蹊径一.借助工具打开这个网页PlanetB; 就是这个:http://www.planetb.ca/syntax-highlight-word 二.使用步 ...
Word中使用代码高亮插件
Word中使用代码高亮插件 1.下载并安装:SyntaxHighlighter4Word.zip 解压,然后双击bin\word2010\Kong.SyntaxHighlighter.Word2010 ...
如何向Word中插入代码块
如何向Word中插入代码块对于一些用Word写的论文,作业中如果要插入代码,无论是直接复制粘贴还是加上灰色无边框的效果看上去十分不美观, 优雅的插入代码块给别人的印象就会好很多. 思路:将代码块的原 ...
【经验】 - 如何优雅的在 Microsoft word中插入代码
一.工具方法1.打开这个网页PlanetB; 方法2.或者谷歌搜索syntax highlight code in word documents,检索结果的第一个.如下图: PS. 方法1和2打开的 ...
如何优雅地在Word中粘贴代码
大家日常在用word写实验or大作业报告时肯定都有需要在word中附上代码的时候吧~ 直接从编辑器中ctrl+c过来的代码往往显得不太美观,笔者有一个小技巧可以使得代码看上去更加美观一些,在这里分享出 ...
word 解放双手，使用宏批量添加word中表格边框以及自适应
Sub 宏2() ' ' 宏2 宏 ' ' For Each aTable In ActiveDocument.TablesWith aTableaTable.SelectWith .Borders( ...
如何在word中插入代码块
1.打开http://www.planetb.ca/syntax-highlight-word网站 2.将你的代码复制进去,选择编译语言,点击"Show Highlighted" ...

利用“宏”来为Word中的代码编写行号

需求

宏代码是这样的

宏代码块

实验结果

利用“宏”来为Word中的代码编写行号相关推荐

最新文章

热门文章