目录

方法1：表格法

方法2：制表位法

    新建“样式”批量设置

参考资料

写论文时，要求公式居中，编号右对齐。刚开始碰到这种问题，很麻烦，网上看了好多方法，目前，两种方法比较实用。第一种是表格法，方便快捷；第二种是制表位法，刚开始设置比较繁琐，一旦设置好了，比表格法速度还要快。个人推荐制表位法，当然，这样看自己的习惯了。下面将依次介绍两种方法实现公式居中，编号右对齐。



 

 

方法1：表格法

1、插入一行三列的表格，在表格中依次插入公式，序号；





 

2、接下来，设置公式居中，编号右对齐。将光标定位到公式处的单元格 ——> 段落选项卡选择居中的图标；

     再选中表格中编号处单元格 ——> 段落卡选择右对齐的图标。设置完成后，公式居中，编号右对齐了，接下来将表格的框线去除就可以了。







 

3、选中整个表格——>段落选项卡找到边框的图标 ——> 选择“无框线”。

     这样，就设置完毕了，其他的基本设置，自己慢慢探索吧。







 

方法2：制表位法

      插入制表位的思想是用两个制表位将一行分为三个部分，关键在于两个制表位参数的设置。这也是制表位中较为繁琐的，不同期刊要求的页面的页边距不同，所设置的也不同。

1、熟悉制表位

   光标在任意位置 ——> 右击选择“段落” ——> 选择“制表位” ——> 看到对齐方式：“居中”，“右对齐”





 

2、 熟悉自己页面纸张大小和页边距，一般论文都是用默认的A4纸，A4纸大小为 21cm×29.7cm。 页边距默认为：上下左右分别为：2.54cm，2.54cm，3.18,cm，3.18cm。下面将以这些参数设置制表符，这些参数一定要知道，也是制位表的关键。





 

3、熟悉了制位表，纸张大小和页边距，下面就要正式进入主题了。

（1）第一个制表位：设置在页面中间，计算公式为：(21cm-3.18cm×2)÷2=7.32 cm ;

（2）第二个制表位：设置在页面右侧，计算公式为：21cm-3.18cm=17.82 cm ;

看到这，是不是很懵，默默地拿起笔，在纸上算，什么鬼，居然还有计算公式？为了更直观理解，可以参考下图。



 

（3）设置第一个制表位，在光标处右击“段落” ——> “制表位” ——> “制表位位置” 输入：7.32厘米 ——> “对齐方式” 选择“居中” ——> 确定；



 

 

（4）设置第二个制表位

         在光标处右击“段落” ——> “制表位” ——> “制表位位置”输入：17.82厘米 ——> “对齐方式”选择“右对齐”——>确定；



 

（5）设置好制表位后，在原先的光标处输入公式和编号，此时公式和编号处于居中，将光标放到公式前面，按“<——Backspace” 键，使其左对齐；





 

（6）光标放在公式前，按“Tab”键；此时，公式和编号居中。

         接着光标定位到公式后和编号中间，同样按“Tab”键，此时公式居中，编号右对齐。





 

至此，制位表法设置完毕。假如每个公式都是这样设置，太麻烦，刚才是针对某一个公式设置。实际，在写论文，有很多公式，此时需要借助“样式”，来帮助我们完成批量设置。

 

 

    新建“样式”批量设置

（1）第一步，新建公式的样式。

         选择“样式选项卡”右下角小箭头，选择“新建样式”；



   

     设置名称为：公式

     后续段落样式为：正文

     选择 ——> 格式 ——> 制表位，与之前设置制表位样，分别设置第一个制表位 7.32厘米 和 第二个制表位 17.82厘米。



 



 



 

（2）设置好后，“样式选项卡”多出一个“公式”样式，此时在文档的任意位置输入公式和编号，注意，此时公式和编号的样式属于“正文”，光标定位到公式那一行，选择样式“公式”；







 

（3）与之前的步骤相同，将光标分别放到公式前面，按“<——Backspace”键，使其左对齐。



     

      分别将光标放在公式前，按“Tab”键；此时，公式和编号居中。

       接着将光标定位到公式后和编号中间，同样按“Tab”键，此时公式居中，编号右对齐。



       

以上，对论文中，公式居中、编号右对齐的就设置完毕了。个人推荐制位表法，尤其是，有很多公式的时候，设置一个样式就OK了。其实，在编号一般要自动设置，这样在论文修改时，删除某一个公式，编号会自动变化。如果没有设置自动编号，那样，费时间，牵一发而动全身。自动编号有很多种方法，一种是：在Word 2016 设置“插入题注”。另一种是MathType公式编辑器中设置，插入编号。当然，我推荐，使用Word 2016 设置“插入题注”，简单方便。关于插入题注和交叉引用方法，可以参考另一个博文：Word 2016 撰写论文：交叉引用，公式自动设置编号可以借鉴。

 

注：本博客于2019年5月6日 19：48更新：将3.17改为3.18。

若有更好的方法欢迎到评论区留言，一起学习，共同进步。

 

 

关于 Word 撰写论文 其他的注意及使用技巧可参见我的其他博文：

[1] Word 2016 撰写论文(2): 交叉引用

[2] Word 2016 撰写论文(3): 文献中常见的表格（三线表）制作

[3] Word 2016 撰写论文(4): 批量修改MathType公式字体大小

[4] Word 2016 撰写论文(5): MathType 矩阵中的每个元素居中对齐

[5] Word 2016 撰写论文(6): 取消/撤销 自动编号

[6] Word 2016 撰写论文(7): 毕业论文中引用多篇参考文献

 

还有关于 LaTex 论文排版 相关内容：

[1] LaTex 论文排版(1): Win10 下 LaTex所需软件安装 (Tex live 2018 + Tex studio)

[2] LaTex 论文排版(2): 插入公式 (从MathType公式编辑器导入到LaTex中)

[3] LaTex 论文排版(3): 插入参考文献

[4] LaTex 论文排版(4): 插入图片(Visio图转换成.eps图)

 

 

参考资料

[1] https://jingyan.baidu.com/article/948f592421b812d80ef5f971.html

[2] https://zhidao.baidu.com/question/2207504816335761148.html

[3] http://blog.sina.com.cn/s/blog_16c899fde0102wzgc.html

 

 

如果觉得内容还不错的话，欢迎点赞、转发、收藏，还可以关注微信公众号、CSDN博客、知乎。

 

1. 微信公众号:



2. CSDN博客：https://xiongyiming.blog.csdn.net/

3. 知乎：https://www.zhihu.com/people/xiongyiming

 

 

一、工具

方法1.打开这个网页PlanetB;

方法2.或者谷歌搜索syntax highlight code in word documents，检索结果的第一个。如下图：



PS. 方法1和2打开的为同一个网站。

二、步骤

1.将你需要插入在word中的代码完整的复制到该网站提示的文本框内，选择你的代码类型，如C,C++,HTML等，并点击提交。如下图：





2.该网页会自动将该代码生成到一个新的页面，此时ctrl+A全选，后ctrl+c复制到word中粘贴就好。如下图：



三、体验

以下为本次实验代码在word中的对比图。

1.和单纯的复制粘贴相比



2.和简单的加入一个灰色无边框的1*1表格相比



PS.由于此次测试使用的代码并不是用常见的语言编写的，所以并没有起到很好的代码高亮作用，在word中还会出现英语的语法错误。

可在word中设置仅对该文档不使用语法检查。下图为关闭语法错误提示后的效果对比。

一，简介
Python可以利用python-docx模块处理word文档，处理方式是面向对象的。也就是说python-docx模块会把word文档，文档中的段落、文本、字体等都看做对象，对对象进行处理就是对word文档的内容处理。
二，相关概念
如果需要读取word文档中的文字（一般来说，程序也只需要认识word文档中的文字信息），需要先了解python-docx模块的几个概念。
1，Document对象，表示一个word文档。
2，Paragraph对象，表示word文档中的一个段落
3，Paragraph对象的text属性，表示段落中的文本内容。

三，模块的安装和导入
需要注意，python-docx模块安装需要在cmd命令行中输入pip install python-docx，如下图表示安装成功（最后那句英文Successfully installed，成功地安装完成，十分考验英文水平。）

注意在导入模块时，用的是import docx。
也真是奇了怪了，怎么安装和导入模块时，很多都不用一个名字，看来是很有必要出一个python版本的模块管理程序python-maven了，本段纯属PS。
四，读取word文本
在了解了上面的信息之后，就很简单了，下面先创建一个D:\temp\word.docx文件，并在其中输入如下内容。

然后写一段程序，代码及输出结果如下：
#读取docx中的文本代码示例
import docx
#获取文档对象
file=docx.Document("D:\\temp\\word.docx")
print("段落数:"+str(len(file.paragraphs)))#段落数为13，每个回车隔离一段

#输出每一段的内容
for para in file.paragraphs:
    print(para.text)

#输出段落编号及段落内容
for i in range(len(file.paragraphs)):
    print("第"+str(i)+"段的内容是："+file.paragraphs[i].text)

运行结果：
================ RESTART: F:/360data/重要数据/桌面/学习笔记/readWord.py ================
段落数:13
啊

我看见一座山

雄伟的大山

真高啊

啊

这座山是！

真的很高！
第0段的内容是：啊
第1段的内容是：
第2段的内容是：我看见一座山
第3段的内容是：
第4段的内容是：雄伟的大山
第5段的内容是：
第6段的内容是：真高啊
第7段的内容是：
第8段的内容是：啊
第9段的内容是：
第10段的内容是：这座山是！
第11段的内容是：
第12段的内容是：真的很高！
>>> 

如有问题请扫码联系我

啰嗦几句…
前不久才重装过系统，可是没多久就出现了一个很恶心的问题：word文档、excel文档图标异常，显示的是下面这样：


打开倒是可以正常用word打开，文件关联是对的，重装office都没解决。

忍了几天终于忍不了啦，尝试网上搜了几次，都没有找到解决办法。
插一行
评论里有人说：

最简单的方法是删掉注册表那里的，然后去控制面板–程序和功能–office2010–右键更改–选修复就行了

很久没用Windows了，我没试，遇到问题的可以试试。
进入正题
问题所在
今天再次折腾一下，偶然发现一处似乎起着决定性的地方：

注册表的**[HKEY_CLASSES_ROOT\Word.Document.12\DefultIcon]**

这里的12是word文件版本，12对应的应该是docx，8对应的应该是97~03的doc，大概如此，不做深究，从名字能看出，这个肯定跟图标有关系的，点进去看到：

竟然是wps.exe。。。而wps是曾经装某个软件的时候被偷偷摸摸装上的（我已经很小心了…唉…存钱买果），没想到软件卸载了，屁股却没擦干净。
这里说一下对上图中“***\wps.exe,3”的推测，记得大学的时候闲着没事，捣鼓过icon提取软件，可以提取exe或某些dll里面打包的icon，一个exe或dll里面可能有很多icon（包括不同尺寸和内容，当然也可以没有），而这个3可能跟顺序有关，类似于数组的索引吧…算了，不求甚解啦
既然找到问题所在，改起来自然不在话下。
改成c:\word安装处\word.exe,1

改成c:\word安装处\word.exe,2

改成c:\word安装处\word.exe,3

改成c:\word安装处\word.exe,4

改成c:\word安装处\word.exe,5

word安装处可以试试在word快捷方式上右键->打开文件位置，如果还是个快捷方式，则继续右键->打开文件位置。
注意：更改后想要看到效果，需要重建图标缓存，方法在最后
效果分别如下：





不好意思…每次都把那个蠢xlsx带着…
看了几个都没有喜欢的，灵光一闪，改成c:\word安装处\word.exe,0

嗯~~~好，就它啦！
xlsx、pptx类似，动动手吧，帮windows和流氓软擦屁股…
提示：

xlsx在[HKEY_CLASSES_ROOT\Excel.Sheet.12\DefultIcon]

pptx在[HKEY_CLASSES_ROOT\PowerPoint.Show.12\DefultIcon]

如果doc、xls、ppt图标异常，把Word.Document.8、Excel.Sheet.8、PowerPoint.Show.8的DefultIcon也改一下，应该就ok啦
最终如图：


啊哈，舒服多了~
重建图标缓存方法
将以下内容保存为 无论啥名字.vbs （文件放哪都行，桌面就行），运行即可
On Error Resume Next
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.DeleteFile(FSO.GetSpecialFolder(0) & "\shelliconcache")
Set FSO = Nothing
Set Pros = GetObject("winmgmts:\\.\root\cimv2").ExecQuery ("Select * from Win32_Process Where Name = 'explorer.exe'")
For Each Pro in Pros
Pro.Terminate
Next