VBA 给word 所有表格加框线.pdfVIP

  • 2
  • 0
  • 约1.06千字
  • 约 1页
  • 2026-07-01 发布于江西
  • 举报

处理当前文档所有表格的VBA代码请在Word中按下Alt+F11打开VBA编辑器,插入一个新模块,然后粘贴以下代码:

SubProcessAllTablesInCurrentDoc()

DimdocAsDocument

DimtblAsTable

DimtableCountAsLong

获取当前活动文档

SetdocActiveDocument

tableCountdoc.Tables.Count

检查文档中是否存在表格

IftableCoun

文档评论(0)

1亿VIP精品文档

相关文档