WORD文档中的表格：自定义方式的批处理，增删行列和内容

WORD文档中的表格：自定义方式的批处理，增删行列和内容；

大家有没有遇到需要处理WORD文档中的表格，表格多，需要大量的重复性工作；

office提供了宏录制方式，可以编辑风格，内容，但是针对增删表格却不好处理，没关系，WORD还支持VB语言的定制处理，可以针对每一个对象的处理，当然也可以批量处理。

开发工具---> Visual Basic :

用户窗体--->模块

示例代码如下，可参考：

Option Explicit
Sub addd()
Dim tbl As Table
Application.ScreenUpdating = False
For Each tbl In ActiveDocument.Tables
'为了过滤掉可能不是测试用例的表格
If tbl.Rows.Count >= 8 And tbl.Columns.Count = 1 Then
'添加3行，在首列前添加1列
'tbl.Rows.Add BeforeRow:=tbl.Rows(5)
'tbl.Rows.Add BeforeRow:=tbl.Rows(5)
'tbl.Rows.Add BeforeRow:=tbl.Rows(5)
'tbl.Columns.Add BeforeColumn:=tbl.Columns(1)
tbl.AutoFitBehavior (wdAutoFitContent)
End If

'If tbl.Rows.Count >= 8 And tbl.Columns.Count = 2 Then
'添加3行，在首列前添加1列
' tbl.Rows.Add BeforeRow:=tbl.Rows(5)
' tbl.Rows.Add BeforeRow:=tbl.Rows(5)
' tbl.Rows.Add BeforeRow:=tbl.Rows(5)
'tbl.Columns.Add BeforeColumn:=tbl.Columns(1)
' tbl.AutoFitBehavior (wdAutoFitContent)
'End If

'设置首列固定宽度
tbl.Columns(1).Width = 60
'设置首列对应的内容
tbl.Cell(Row:=1, Column:=1).Range.Text = "用例编号"
tbl.Cell(Row:=2, Column:=1).Range.Text = "用例名称"
tbl.Cell(Row:=3, Column:=1).Range.Text = "测试目的"
tbl.Cell(Row:=4, Column:=1).Range.Text = "预置条件"
tbl.Cell(Row:=5, Column:=1).Range.Text = "测试点"
tbl.Cell(Row:=6, Column:=1).Range.Text = "样本点"
tbl.Cell(Row:=7, Column:=1).Range.Text = "测试环境"
tbl.Cell(Row:=8, Column:=1).Range.Text = "测试步骤"
tbl.Cell(Row:=9, Column:=1).Range.Text = "预期结果"
tbl.Cell(Row:=10, Column:=1).Range.Text = "测试结果"
tbl.Cell(Row:=10, Column:=2).Range.Text = ""
tbl.Cell(Row:=11, Column:=1).Range.Text = "测试结论"
tbl.Cell(Row:=11, Column:=2).Range.Text = "通过[ ] 未通过[ ] 未测[ ]"
tbl.Cell(Row:=12, Column:=1).Range.Text = "备注"

Next
Application.ScreenUpdating = True
End Sub

WORD文档中的表格：自定义方式的批处理，增删行列和内容相关推荐

java poi操作word2007_java使用poi解析2007以上的word文档中的表格与图片
项目中使用到了要解析word文档中的表格与图片,网上的2003的解析方式很多,2007以上的很少,我看了官网找了资料自己写了一个简单的解析方案,大家共同学习吧!有不对的地方希望大神指教! import ...
用Aspose.Words 从Word文档中提取表格数据
用Aspose.Words 从Word文档中提取表格数据对于某些项目,开发人员需要从Word文档中提取数据并导出到数据库.最大的挑战是必须支持现有Word文档. 相同格式且带多个数据块的Word文档 ...
办公室小姐姐的福利！用Python批量提取word文档中的表格和图片内容
点上方"菜鸟学Python",选择"星标" 第491篇原创干货,第一时间送达最近有许多小伙伴想要一些自动化办公的福利小程序,今天就满足大家的需求.日常的办公过 ...
python合并word表格单元格_Python实战009：读取Word文档中的表格数据及表格合并问题解决...
同事最近被安排整理资料,主要工作室将文档中的表格数据提取出来并整理层Excel表格供我们FII刀具商城进行资料维护.由于刀具的种类繁多且规格无数,所以要处理的数据量相当的庞大.人工核对整理既费时又费力 ...
Python3-word文档操作（五）：利用python修改word文档中的表格数据
1. 简介: 本篇继续学习python操作word文档的相关知识.本篇主要学习: 1)如何获取一个已经存在文档中的表格的内容: 2)如何修改一个已经存在文档中的表格的内容: 2. 获取word文档中的 ...
python环绕文字_Java 设置 Word 文档中图片文字环绕方式
Java 设置 Word 文档中图片文字环绕方式在Word文档中插入图片时,选择合理的图片文字环绕方式可以使图片的展示效果更好,也能使页面的排版更加美观.本文就将介绍如何使用Free Spire.D ...
C# 在word文档中复制表格并粘帖到下一页中
C# 在word文档中复制表格并粘帖到下一页中 object oMissing = System.Reflection.Missing.Value; Microsoft.Off ...
批量抽取word文档中的表格
用于抽取word文档中指定表格的指定数据供学习交流 import pandas as pd import docx import osdef get_data_from_path(save_path ...
python生成word文档的表格_2018-10-04 [日常]用Python读取word文档中的表格并比较
演示如下. 两个简单的word文档, 各有一个表格: 读取文档中的表格到列表(为演示只对单列表格操作): import docx def 取表格(文件名): 文件 = docx.Document(文件 ...

WORD文档中的表格：自定义方式的批处理，增删行列和内容

WORD文档中的表格：自定义方式的批处理，增删行列和内容相关推荐

最新文章

热门文章