VBA实现 物理数据公式快速输入（Eq域公式）

VBA实现 物理数据公式快速输入（Eq域公式）

摘要：

本文章主要是分享word中利用VBA实现物理数学公式的快速输入，公式主要是以Eq域的形式呈现。

1 Eq域公式介绍：

1.1 目前公式编辑器存在的问题

1.1.1 MathType：

1. 字体不能改变颜色，全黑色；
2. 尽管可以更改字体大小，但是很繁琐，大多数不知道怎样改；
3. 公式的位置时有偏离原定位置,会高出半行甚至一行,这在经过网络传送后更常见,让人烦透了；
4. 有些表达式竟也打不出来,如“弧AB”、“矢量AB”、“不包含”的符号等。

1.2 Eq域公式介绍

1.2.1 域是什么

1. 域是Word中的一种特殊命令,它由花括号{}、域名(如EQ、DATA等)及域开关(如\F()是分数开关)构成。
2. 域代码类似于公式,域选项开关是Word中的一种特殊格式指令,在域中可触发特定的操作。
3. 域是Word的精髓,它的应用是非常广泛的,Word中的“插入对象、页码、目录、索引、求和、排序、拼音指南、双行合一、带圈字符”等等,都使用了域的功能。

1.2.2 Eq域

​ EQ域主要用于编排复杂的数理公式。EQ域中有很多基本的域指令,分别用于表达积分、根号、括号、重叠、上下标及分式等,如果嵌套使用,可排出各类复杂的表达式。

优点：

1. 可编辑性强
2. 可以通过调节字体大小，统一调节公式的大小，而这确是word中常用公式编辑器MathType的痛点，总觉得MathType公式编辑器输入的公式与word不太协调。
3. 可以设置通过像设置字体一样设置公式的颜色

本文接下来将，详述EQ域开关的使用方法,对每一个开关和可用参数都给出实例并加以讲解,然后给出常用的数学表达式。
演示实例

2 Eq域公式详述

2.1 分数开关\f(,)：创建分数,分子分母分别在分数线上下居中。

实例：

域代码： {EQ 18\f(5,132)}讲解：{EQ 18\分数(分子,分母)}

2.2 根号开关\r(,)：使用一个或两个元素绘制根号。(radical)

实例：

域代码：{EQ \r(5,2a+b)}讲解：{EQ \根号r(根指数5,被开方数2a+b)}

2.3 上标下标开关\s():将元素放置为上标或下标字符

实例：

域代码： {EQ C\s(3,12)}讲解：{EQ C\上下标(上标3,下标12)}

2.4 重叠开关\o():将每个后续元素置于前一个元素之上

实例：

域代码：{EQ \o\al(ABC,\s\up10(︵))}讲解：{EQ \o重叠\左对齐(ABC,\s\up10(︵))} \ac居中(alignceter)

2.5 括号开关\b():用大小适当的括号括住元素

实例：

域代码：{EQ \b(\a(100,2,31))}讲解：{EQ \加括号(\数组(100,2,31))}

实例：

域代码：{EQ \b\lc|(\a(100,2,31))}讲解：{EQ \加括号\左括号使用字符|(\数组(100,2,31))}

3 VBA 实现Eq域代码快速插入

3.1 演示实例

3.2 VBA 代码（VBA 源代码代码：https://download.csdn.net/download/u012842451/12639281 ）

3.3 如何使用 VBA 代码？（VBA新手）