使用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 怎么获取下面的: glove_word2id.json和 glove_numpy.npy 这两个文件
- ¥15 js调用html页面需要隐藏某个按钮
- ¥15 ads仿真结果在圆图上是怎么读数的
- ¥20 Cotex M3的调试和程序执行方式是什么样的?
- ¥20 java项目连接sqlserver时报ssl相关错误
- ¥15 一道python难题3
- ¥15 牛顿斯科特系数表表示
- ¥15 arduino 步进电机
- ¥20 程序进入HardFault_Handler
- ¥15 oracle集群安装出bug