VBA 编辑word文档中的多个表格,填充内容 您所在的位置:网站首页 如何一次填充批量单元格 VBA 编辑word文档中的多个表格,填充内容

VBA 编辑word文档中的多个表格,填充内容

2024-06-18 11:03| 来源: 网络整理| 查看: 265

序言

一份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 实验室设备网 版权所有