wordvba如何提取文章段落vba从word中提取内容到excel表格

发布网友发布时间：2024-07-02 07:44

共1个回答

热心网友时间：2024-09-29 16:05

　　同时按Alt和F11进入宏界面，点菜单的插入，模块，粘贴如下代码：
　　Subtest()
　　Selection.HomeKeywdStory
　　Selection.Find.Text=\"关键字\"
　　Selection.Find.Execute
　　Selection.Paragraphs(1).Range.Copy
　　Documents.Add
　　Selection.Paste
　　EndSub
　　这个代码，把查找到的第一个“关键字”所在的段落，复制到一个新的文档里。
　　ThisDocument.Paragraphs(3)ThisDocument.Paragraphs(3).Range.SelectSelection.Font.Size = 12Selection.Font.ColorIndex = wdRed上面语句表示文档的第三段落的内容，供你参考。

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com