【Office】如何用vba给word模板中现有表格新增插入行列?
				
									
					
					
						|  | 
							admin 2025年1月17日 11:39
								本文热度 2141 | 
					
				 
				在word 表格中可以插入行列。
如果要用vba给word表格插入行或者列,可以使用如下的代码:
Sub exceloffice()
  Dim oDoc As Document
  Set oDoc = Word.ActiveDocument
  Dim oT As Table
  Dim oRow As Row
  Dim oColumn As Column
  With oDoc
  Set oT = .Tables(1)
    With oT
      '设置要在第几行前面插入行,这里是第2行
      Set oRow = .Rows(2)
      '在第2行前面插入行
      .Rows.Add oRow
      Set oColumn = .Columns(3)
      '在第3列左边插入一个空列
      .Columns.Add oColumn
    End With
  End With
End Sub
其中Rows.Add方法和Columns.Add后面必须带具体的某行或某列对象。
相关教程:
 【Office】利用VBA在Word模板文档的末尾插入一个3行4列表格,并在单元格中插入指定内容[
【Office】利用VBA在Word模板文档的末尾插入一个3行4列表格,并在单元格中插入指定内容[ 5]
5]
  http://28745.oa22.cn
 【Excel】VBA复制指定单元格内富文本内容,并赋值给另外一个单元格,避免文字不同大小、粗细、颜色等格式丢失[
【Excel】VBA复制指定单元格内富文本内容,并赋值给另外一个单元格,避免文字不同大小、粗细、颜色等格式丢失[ 5]
5]
  http://28666.oa22.cn
 【VBA】在Excel外部查找和替换Word模板文件中的自定义变量引用(本方法适用于微软Office和金山WPS软件)[
【VBA】在Excel外部查找和替换Word模板文件中的自定义变量引用(本方法适用于微软Office和金山WPS软件)[ 141]
141]
  http://28652.oa22.cn
 【Office】vba如何替换Excel单元格文本中的换行为指定字符,实现导出到Word模板中变量时仍然保留换行符?[
【Office】vba如何替换Excel单元格文本中的换行为指定字符,实现导出到Word模板中变量时仍然保留换行符?[ 245]
245]
  http://28733.oa22.cn
 【Office】将Excel表格内容导出到Word模板的指定表格中,并保留Word表格中的要求指定格式[
【Office】将Excel表格内容导出到Word模板的指定表格中,并保留Word表格中的要求指定格式[ 12]
12]
  http://28742.oa22.cn
 【Office】Excel中如何清除单元格数据有效性验证(下拉菜单)?[
【Office】Excel中如何清除单元格数据有效性验证(下拉菜单)?[ 39]
39]
  http://28737.oa22.cn
 【Office】Word中VBA之Find.Execute方法参数说明[
【Office】Word中VBA之Find.Execute方法参数说明[ 205]
205]
  http://28735.oa22.cn
该文章在 2025/1/17 11:46:55 编辑过