如何把WORD文档中的第一个表格复制10从此放在后面
用LIS打开文件后,获取第一个表格,把表格复制10个放在当前表格的后面,有大神知道的,指点一下,谢谢
(defun c:tt()
(setq path "C:\\Users\\Administrator\\Desktop\\坐标.doc")
;;;打开文件
(setq Rtn (vlax-get-or-create-object "word.application"))
(vlax-invoke-method (vlax-get-property Rtn 'Documents) 'Open path)
(vla-put-visible Rtn 1)
(vlax-get-property Rtn "ActiveDocument")
(setq word (vla-get-ActiveDocument Rtn))
(setq bg1 (vla-item (vlax-get word 'tables) 1) );;;第一个表格
;;;问题:如何把这个表格复制10个放在后面
)
期待高手截胡
页:
[1]