1,打开一个doc文档;
2,代码编写:
.版本 2 .局部变量 wdapp, 对象 .局部变量 tblIndex, 整数型 |
.版本 2
' doc文档中精确定位表格单元格中并写入文本
wdapp.获取(“word.application”) ' 加载已经打开的doc文档
tblIndex = 1'第一个表格
row = 3
column = 3
wdapp.读对象型属性 (“ActiveDocument”, ).读对象型属性 (“Tables”, ).对象型方法 (“Item”, tblIndex).对象型方法 (“Cell”, row, column).对象型方法 (“select”, )'定位到第一个表格的第三行第三列的单元格中
wdapp.读对象型属性 (“Selection”, ).对象型方法 (“TypeText”, “定位1”)'在单元格中输入文本
wdapp.清除 () ' 释放变量