作者:乔山办公网日期:
返回目录:word文档
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=50, NumColumns:= _
4, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
wdAutoFitFixed
With Selection.Tables(1)
If .Style <> "网格型" Then
.Style = "网格型"
End If
.ApplyStyleHeadingRows = True
.ApplyStyleLastRow = False
.ApplyStyleFirstColumn = True
.ApplyStyleLastColumn = False
.ApplyStyleRowBands = True
.ApplyStyleColumnBands = False
End With
补充一下,可以用录制宏7a64e78988e69d83336的方法查看代码学习编程,我也是在学习中
向下移动Word表格的方法:
方法一:
1、将百鼠标放到表格左上角,会在左上角看到一个十字度方框图标;
2、当鼠标点指针变为带箭头的十字形进,单击选中左上角的十字方框图标,就会选中整个表格;
3、向下拖动表格到合适的位置松手,在表问格上面插入答一个段落标记。
方法二:
1、将光标放在表格第一个回单元格的最答前面;
2、按回车键,即可在表格上面插入一个段落标记,这时就可以添加文字。
注:此种方法,表格必须位置文档页面的最前面,否则按回车键将在单元格中输入一个段落标记。
怎么用vb编程操作zdword绘制表格的边框操作步骤:
1、单击开始----查找按钮(或按Ctrl + F组合键);
2、弹出查找对话框,在查找内容处输入需专要查找的数字,在以下项中查找处选择主文档,单击关闭按钮;
3、此时文属档中所的查找的数字都被选中。
下面的代码是把新建文e799bee5baa6e79fa5e98193e58685e5aeb9339档里开头的那个表格插入并移动到第5行,不明白的百度HI我
ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=4, NumColumns:= _
4, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
wdAutoFitFixed
With Selection.Tables(1)
If .Style <> "Table Grid" Then
.Style = "Table Grid"
End If
.ApplyStyleHeadingRows = True
.ApplyStyleLastRow = False
.ApplyStyleFirstColumn = True
.ApplyStyleLastColumn = False
End With
Selection.SplitTable
Selection.TypeParagraph
Selection.TypeParagraph
Selection.TypeParagraph
Selection.TypeParagraph