![]() 填好之后点击确定,然后光标的地方就会多出一个一团乱码一样的东西。 ![]() 点击插件上的第二个按钮,进行编译。 ![]() 然后乱码变成了 [1],文章的最后出现了参考文献列表。 ![]() 9. 符号替换 写作的时候经常会出现这种情况:写作初期有些名称没有定下来,后期很可能要改。比如你文章中提出了一个算法,但是算法名字还没想好,文章中到处需要引用这个名字。与运算是用 & 还是 &&?更是有的时候遇到没节操的甲方,改来改去,改来改去,改来改去,改来改去,改来改去,改来改去…… LaTeX 解决这种问题的思路很简单,定义一个命令就好了,文章继续往下写,以后要改的话重新定义命令就好了。 \newcommand{\myalg}{NIMLE} \newcommand{\AND}{\&{}} ... This paper proposed a novel algorithm named \myalg. ... 0xFF \AND 0xEF ... Word 也可以实现类似的功能。这里介绍一种利用域来实现这种符号定义的方法。关于域的介绍,详见 百度百科_Word域。 Word 中有各种各样的域,其中一种域叫做 DOCVARIABLE,语法格式为: { DOCVARIABLE sym } 域 DOCVARIABLE 的作用就是把变量 sym 显示出来。举个建国:ICS = “工业控制系统”,那么域 DOCVARIABLE 会将所有的 { DOCVARIABLE ICS } 替换成 ”工业控制系统“。 所以在 Word 中实现 LaTeX 中的宏替换功能需要以下几步: 1. 在变量集合 Variables 中添加 ICS,并给其赋值; 2. 按 Ctrl +F9 插入域,手动输入 DOCVARIABLE ICS。 相当的没有效率,被 LaTeX 甩几条街有木有。但是不用担心,Word 自有它的过人之处:VBA。下面介绍一种方法来简化这个过程。 点击菜单中的宏,如下图所示,宏名随便填,然后点击创建,如下图所示。 ![]() 删除代码框中的所有代码,然后将下列代码复制进去。 Sub UpdateVariable() ' Clear variables For Each Var In ActiveDocument.Variables Var.Delete Next ' Set the file path Dim MyFile As Object Set MyFile = CreateObject("Scripting.FileSystemObject") Dim FilePath As String FilePath = ActiveDocument.Path & "\Symbols.xlsx" ' If can't find the file, show error message and exit sub If Not MyFile.FileExists(FilePath) = True Then MsgBox "Can't find file: Symbols.xlsx", Title:="Error" Exit Sub End If ' Read the Excel file "Symbols.xlsx" Dim ExcelObject As Object Set ExcelObject = GetObject(FilePath) Set Table = ExcelObject.Sheets(1).UsedRange() For i = 1 To Table.Rows.Count V1 = Table.Cells(i, 1).Text V2 = Table.Cells(i, 2).Text ActiveDocument.Variables.Add Name:=V1, Value:=V2 Next ' Update fIEld ActiveDocument.FIElds.Update End Sub Sub InsertSymbol() ' Show inputbox Symbol = InputBox("Input symbol") ' Insert fIEld Selection.FIElds.Add Range:=Selection.Range, Type:=wdFIEldEmpty, _ PreserveFormatting:=False ' Insert parameter Selection.TypeText Text:="DOCVARIABLE " & Symbol ' Update fIEld ActiveDocument.FIElds.Update End Sub 如下图所示 ![]() 这样两个宏就创建好了,为了方便的调用,将这两个宏添加到工具栏中。打开自定义工具栏窗口。找到刚刚新建的两个宏,将他们添加到开始选项卡中(凭个人喜好,爱放哪放哪)。 ![]() 然后重新设置他们的名字和图标,此步骤可省略,如下图所示。 ![]() |