我有一个完整的word文档表单的文件夹,我有一个excel文件,将表单上的所有答案读入电子表格中的不同工作表 . 导出数据的工作表取决于word文档的文件名 .

这目前工作正常 .

但是,我现在需要它能够考虑存储在word文档页脚中的表单的版本号,但我不知道如何引用它 .

对于VBA来说,我是一个非常棒的人,所以没有尝试过多少 .

我尝试过的VBA可以在下面找到,但不出所料 .

Sub ReadWordDoc(filenme As String)

Dim Val As String

Dim WrdDoc As Document

Dim FormFieldCounter As Integer

Dim version As String

Set wordapp = CreateObject("word.Application")

wordapp.Documents.Open filenme

wordapp.ScreenUpdating = False

Set WrdDoc = wordapp.Documents(filenme)

wordapp.Visible = True

version = WrdDoc.Sections(1).Footers(wdHeaderFooterFirstPage).Range.Text

FormFieldCounter = 1

If InStr(version, "5.00") Then

RowCounter = RowCounter + 1

Sheets("Version 5").Cells(RowCounter, FormFieldCounter) = filenme

Do While FormFieldCounter <= 125

WrdDoc.FormFields(FormFieldCounter).Select

Val = WrdDoc.FormFields(FormFieldCounter).result

Sheets("Version 5").Cells(RowCounter, FormFieldCounter + 1) = Val

FormFieldCounter = FormFieldCounter + 1

Loop

wordapp.Documents(filenme).Close SaveChanges:=wdDoNotSaveChanges

wordapp.Quit

Else

'Do something else

End If

End Sub

java读取word页码_VBA代码读取word文档页脚相关推荐

  1. Word 利用 vba 代码实现拆分文档页数

    Word使用VBA实现拆分文档页数 实现步骤: 新建一个记事本,添加以下代码 Sub 利用VBA实现Word文档的拆分() On Error Resume Next Dim doc1 As Docum ...

  2. 优雅的在 Microsoft word中插入代码,使文档更美观!!!

    在word文档中插入代码或代码段,使用下面的方法会使word更美观: 注:本文是转载自 cyang812  原文:https://blog.csdn.net/u011303443/article/de ...

  3. aspose.words读取文档页数(不准确?)

    前言 在对word操作中,经常需要获取文档页数,这里采用aspose.words来解析文档,获取文档页数.下面几种方式都是基于aspose.words的19.10版本,其他版本可能略有不同. < ...

  4. word打开wps文件乱码_word文档打开是乱码解决方法

    上网搜索资料,好不容易下载一个心仪的文档,当我们再次打开这个文档时,发现Word文档却出现乱码,或者是已经损坏了的文档,这还怎么看呢?如果出现Word文档乱码这种情况,大家不要着急,现在分享word乱 ...

  5. python获取pdf和word文档页数

    python获取word文档和pdf文档页数的方法 1.获取pdf页码数 这里要使用到 pdfplumber 这个库,首先导入 没有安装的同学还需要先安装 pip install pdfplumber ...

  6. 【Unity3D读取数据】(一)Txt文档操作(创建、读取、写入、修改)

    推荐阅读 CSDN主页 GitHub开源地址 Unity3D插件分享 简书地址 我的个人博客 QQ群:1040082875 大家好,我是佛系工程师☆恬静的小魔龙☆,不定时更新Unity开发技巧,觉得有 ...

  7. Word转PDF功能实现,文档转换工具通过PHP开发

    最近比较火的文档转换工具相信大家都听说过,但是怎么实现呢? 通过该接口可以将图片.word.excel.ppt等文档转换为pdf格式的文件 1.可以将Office(Word,Excel,PowerPo ...

  8. word里的html标签,完整word版html标签大全推荐文档

    <完整word版html标签大全推荐文档>由会员分享,可在线阅读,更多相关<完整word版html标签大全推荐文档(11页珍藏版)>请在人人文库网上搜索. 1.实用标准文档文件 ...

  9. Word中使用MathType批量调整文档公式的大小

    Word中使用MathType批量调整文档字母公式大小 背景:论文写作需要撰写大量的字母和数学公式,但是在协作撰写及内容中英文翻译过程中,字母和数学公式容易变形,因此Word中使用MathType批量 ...

最新文章

  1. JBPM回退功能的实现
  2. Java基础-四要素之一《封装》
  3. 【NLP】基于TF-IDF和KNN的模糊字符串匹配优化
  4. 经常使用Log日志打印输出
  5. Windows下将nginx安装为服务运行
  6. 数据库-索引-普通索引-唯一索引
  7. 【VB.NET】VB.NET基本数据类型
  8. 安装SQL2012数据库步骤
  9. 剑指offer38 数字在排序数组中出现的次数
  10. 高清电脑手机壁纸任你选,每天不重样!
  11. 如何重置 RHEL7/CentOS7 系统的密码
  12. IOS学习笔记(五)——UI基础UIWindow、UIView
  13. oracle-不完全数据库恢复-被动恢复-RMAN-06025/ORA-01190
  14. python项目---数据可视化(02)
  15. Android AsyncTask源代码浅析
  16. jsp如何编写java代码_如何在JSP页面内编写java代码?(代码示例)
  17. 台币转换计算机,Soulver 内建自动计算机功能的备忘录工具 货币换算、複杂数学式也支援...
  18. android 像素密度,屏幕密度,values-sw480dp
  19. 人脸识别“抓”错了人,他在监狱待了10天
  20. ubuntu安装mysql失败了,为啥嘞

热门文章

  1. iPad pro快捷键
  2. python序列的主要特点_python的序列类型及其特点-女性时尚流行美容健康娱乐mv-ida网...
  3. mysql45讲学习笔记
  4. 【Electron Playground 系列】窗口篇
  5. sin函数cos函数
  6. 用python写一段对话_如何用Python向与Skype4Py的组对话发送消息
  7. vs2019 找不到头文件、找不到库
  8. 7-2 模拟EXCEL排序 (25分) PTA
  9. python xgboost调参_XGBoost从原理到调参
  10. RAW格式转化为BMP