word中代码高亮加行号

在IDE，网页中代码都是精心排版的，美观漂亮。但是我们在自己的文档中记录笔记写书籍的时候，word文档中的代码却不尽人意，所以通过查找资料，发现有大神已经早就解决好了word中代码排版的问题！
如下图的样式：

那么如何来实现word中的代码高亮加行号，这就是利用word复制粘贴富文本的功能实现代码高亮和VB宏编程来加行号。

第一步：安装notepad,将代码复制粘贴到notepad中，调整文本中的代码语言，使其格式化。

第二步：利用notepad中的插件复制富文本

第三步：word中插入2列一行表格，创建宏。宏代码如下

Sub 设置代码表格()' author: code4101' 设置代码表格 宏''' 背景色为morning的配色方案，RGB为(229,229,229)With Selection.Tables(1)With .Shading.Texture = wdTextureNone.ForegroundPatternColor = wdColorAutomatic.BackgroundPatternColor = 16514043End With.Borders(wdBorderLeft).LineStyle = wdLineStyleNone.Borders(wdBorderRight).LineStyle = wdLineStyleNone.Borders(wdBorderTop).LineStyle = wdLineStyleNone.Borders(wdBorderBottom).LineStyle = wdLineStyleNone.Borders(wdBorderDiagonalDown).LineStyle = wdLineStyleNone.Borders(wdBorderDiagonalUp).LineStyle = wdLineStyleNone.Borders.Shadow = FalseEnd WithWith Options.DefaultBorderLineStyle = wdLineStyleSingle.DefaultBorderLineWidth = wdLineWidth050pt.DefaultBorderColor = wdColorAutomaticEnd With' 段落无首行缩进，行间距为固定值12磅With Selection.ParagraphFormat.LeftIndent = CentimetersToPoints(0).RightIndent = CentimetersToPoints(0).SpaceBefore = 0.SpaceBeforeAuto = False.SpaceAfter = 0.SpaceAfterAuto = False.LineSpacingRule = wdLineSpaceExactly.LineSpacing = 12.KeepWithNext = False.KeepTogether = False.PageBreakBefore = False.NoLineNumber = False.Hyphenation = True.FirstLineIndent = CentimetersToPoints(0).OutlineLevel = wdOutlineLevelBodyText.CharacterUnitLeftIndent = 0.CharacterUnitRightIndent = 0.CharacterUnitFirstLineIndent = 0.LineUnitBefore = 0.LineUnitAfter = 0.MirrorIndents = False.TextboxTightWrap = wdTightNone.AutoAdjustRightIndent = True.DisableLineHeightGrid = False.FarEastLineBreakControl = True.WordWrap = True.HangingPunctuation = True.HalfWidthPunctuationOnTopOfLine = False.AddSpaceBetweenFarEastAndAlpha = True.AddSpaceBetweenFarEastAndDigit = True.BaseLineAlignment = wdBaselineAlignAutoEnd With' 清除原有的段落底纹Selection.ParagraphFormat.Shading.BackgroundPatternColor = wdColorAutomaticEnd SubSub 输入连续数字()' author: code4101行数 = InputBox("请输入代码终止行数", "输入行数", "50")For i = 1 To 行数 - 1Selection.TypeText Text:=iSelection.TypeParagraphNextSelection.TypeText Text:=行数End Sub

第四步：执行宏，格式化表格和加行号。

word中代码高亮加行号相关推荐

如何在ppt或word中添加高亮代码？
如何在ppt或word中添加高亮代码? 问题: 如何ppt中添加带有语法高亮的程序代码,就如同下面的形式(在ppt嵌入高亮代码,且可以编辑,带有行号) 详细的要求如下: 1.代码带有语法高亮. 2.结 ...
vue结合highlightjs实现代码高亮+行号
实现代码高亮+行号设置 1.下载 highlightjs: npm install highlight.js` 2.在main.ts中写 import hljs from 'highlight.js ...
word中论文下面基金号,作者简介怎么加
标题:word中论文下面基金号,作者简介怎么加正文:先将收稿日期.基金项目等变为单栏--会移到中间--敲空格,将右边的双栏内容逐渐放到下边--文件(选项.常规与保持.兼容性选项.按word 6.x/ ...
Word插入代码显示行号并高亮/着色显示
有时候需要编写技术文档,需要在word中插入代码,但直接复制的代码,显示效果可读性非常差,能不能把word上显示的代码弄得给IDE显示的效果一样呢? 答案是可以的. 关键的就是两步: 设置word显示 ...
Word中插入高亮代码：Notepad++
作为程序猿,我们在写文档的时候难免需要插入一些代码.借助 Notepad++ 的插件,可以让我们在 word 文档中插入的代码自带语法高亮,从而更加美观易读. 1. 打开 Notepad++,按&qu ...
word 中插入高亮代码及转带标签的 PDF
一.插入代码及文档代码片段: 使用 vscode 格式化后,直接复制到 word 中即为带格式的高亮代码(而且大小可通过字体调整),注意取消 word 中的拼写检查长段代码: word 中可以直接 ...
在word中插入高亮代码
在写文档的时候特别是技术文档,经常需要在word中插入代码, 直接复制代码的话不是很美观,于是去网上学来一个工具,先附上在线网址:http://www.planetb.ca/syntax-highli ...
Word中插入高亮代码
文章目录一.在线复制二.本地复制目的:有时候我们想copy代码到word中,为了将代码显示规整漂亮,像Markdown一样的格式可以使用如下方法: 一.在线复制 >>进入如下站点 h ...
如何让word中代码更优雅美观【图解】【可微调】
方法综述近期也搜了网上各种解决方法.大致有几种: 利用notepad++来实现 (操作路径有点长,比较麻烦) 自己在word做模版 (这个模版折腾下来倒是可以一劳永逸,但是不支持不同语言的高亮) 国 ...

word中代码高亮加行号

word中代码高亮加行号

第一步：安装notepad,将代码复制粘贴到notepad中，调整文本中的代码语言，使其格式化。

第二步：利用notepad中的插件复制富文本

第三步：word中插入2列一行表格，创建宏。宏代码如下

第四步：执行宏，格式化表格和加行号。

word中代码高亮加行号相关推荐

最新文章

热门文章