ExcelVBA或WordVBA 获取文档中页眉或页脚文字
网友提问:

回答网友问题:
这个锅我可不背:)
2020年11月17日就讲了 在WordVBA视频中

获取对象中的文字,我在wordVBA第一节课就讲了

一、在WordVBA中实现
假设我有一个文档,页眉、页脚如下


在文档中写代码,获取它们的文字,replace是将word中文字的换行符给替换掉
运行结果

这是一个文件的,如果是多个文件的 ,用我们在ExcelVBA第二季讲的 dir函数或AccessVBA第三季讲的FSO对象遍历每个文档。
例如我在 C:\网友提问 文件夹中有2个文档,想获取他们的页眉、页脚内容

打开一个新的word空文档,代码如下
注意代码写在这里

运行后的返回结果:

二、在ExcelVBA中实现
打开一个空白的Excel工作簿,代码如下
运行结果

看似ExcelVBA简单,其实是因为WordVBA中有表格边框的代码!实际使用中,ExcelVBA会比WordVBA慢。因为我们的目标文件是word,我们通过Excel访问它,肯定不如它自己访问自己快!

ExcelVBA与WordVBA:https://www.bilibili.com/video/BV1rt4y1a72y