VBA 编辑word文档中的多个表格,填充内容 | 您所在的位置:网站首页 › 如何一次填充批量单元格 › VBA 编辑word文档中的多个表格,填充内容 |
序言
一份word表格,如何快速更改某单元格的内容,比如说序号,或者是填充自己所需要的列表之类的文字,查阅得知 VBA中的ActiveDocuments.Tables(index)属性,或者使用Python-docx库可以做到。。这篇博客主要记录使用VBA编辑word表格 在平时的工作的,不建议做没必要的重复性劳动。一是提高工作效率,二是督促自己学习 正文直接步入正题,放出VBA代码: i = 2 #2是指表格的数量 m = 2 h = 2 #m,h是指行、列 #循环读取表格中的单元格,并删除内容 for j = 1 To i ActiveDocument.Tables(j).Cell(m, h).Range.Delete Next #循环读取表格中的单元格,并填充序号,比如第一个表格(2,2)填充1,第二个表格(2,2)填充2,依次类推 For k = 1 To i ActiveDocument.Tables(k).Cell(3, 1).Range.InsertAfter "" & k Next这套代码只使用于没有干扰性的表格,啥意思呢,就是一个word文档中只有你想更改的表格,没有多余的表格。。单元格索引是从第一个表格开始,一直循环到最后一个表格,,i的数量就是表格的数量 代码经过在office上的测试,完美运行。 |
CopyRight 2018-2019 实验室设备网 版权所有 |