读取ppt并存入数据库_Access VBA批量提取Word内容写入数据库的几种方法简单分析...

要从Word中读取相应的内容并写入到Access或其它数据库中，可采用的方法

1. 使用Word.application 读取 Word 内容，根据关键字去判断

这个是使用 用office的导入库，但是要求跑程序的机器上有安装office，而且版本必须和开发环境一样

Do While Selection.Find.Execute(findtext:="关键字", Forward:=True)

Do

Selection.MoveEnd Unit:=wdCharacter, Count:=1

Loop Until Selection Like "关键字2"

Do

Selection.MoveEnd Unit:=wdCharacter, Count:=1

Loop Until Selection.Characters.Last = vbCr

Selection.Delete '删除 或把内容提取出来

Loop

2.使用NOPI

使用Office读写的第三方库，比如 NPOI，这个能够支持 03 和 07 两种格式的解析，应该可以满足解析数据这个需求，而且不需要机器上安装 office。第三方库还有其他的，但是 NPOI 目前应该是用的最多的。

NPOI 的 github 代码库： https://github.com/tonyqus/npoi

另外用 vs 的包管理器可以直接从nuget 搜到然后安装，很方便。还有其它 库 ：Aspose.Words，可以他来操作Word文档

3.将word文档另存为xml 或 HTML

再使用xml 读写库对xml处理

或使用正则表达式对html 格式进行处理