使用VBA 修改word文档,添加文本框并在文本框中加入表格,修改表格中某个单元格的值
2条回答
- 一如既往哈 2014-11-24 07:38关注
哦,忘了修改单元格的值了:
Sub test()
With ThisDocument
.Shapes.AddTextbox(msoTextOrientationHorizontal, 50, 50, 200, 200).Select
.Tables.Add Range:=Selection.Range, NumRows:=2, NumColumns:= _
2, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _
wdAutoFitFixed
With Selection.Tables(1)
.Cell(1, 1).Range.InsertAfter "(1,1)"
.Cell(1, 2).Range.InsertAfter "(1,2)"
.Cell(2, 1).Range.InsertAfter "(2,1)"
.Cell(2, 2).Range.InsertAfter "(2,2)"
End With
End With
End Sub解决 1无用
悬赏问题
- ¥15 链接问题 C++LNK2001 无法解析的外部符号
- ¥50 安装pyaudiokits失败
- ¥15 计组这些题应该咋做呀
- ¥60 更换迈创SOL6M4AE卡的时候,驱动要重新装才能使用,怎么解决?
- ¥15 让node服务器有自动加载文件的功能
- ¥15 jmeter脚本回放有的是对的有的是错的
- ¥15 r语言蛋白组学相关问题
- ¥15 Python时间序列如何拟合疏系数模型
- ¥15 求学软件的前人们指明方向🥺
- ¥50 如何增强飞上天的树莓派的热点信号强度,以使得笔记本可以在地面实现远程桌面连接