注册 登录
明经CAD社区 返回首页

mahuan1279的个人空间 http://bbs.mjtd.com/?7303115 [收藏] [复制] [分享] [RSS]

日志

在word里创建表格

已有 827 次阅读2014-10-11 02:49 |个人分类:LISP|系统分类:插件| 在word里创建表格

(vl-load-com)
(setq msw (vl-catch-all-apply 'vlax-create-object '("Word.Application") ))
(vlax-put-property msw 'visible 1)
(setq docs (vla-get-documents msw))
(setq doc (vlax-invoke-method docs  'add ))
(setq ran (vlax-invoke-method doc 'range Start:=16, End:=29))
(setq tabs (vlax-get-property doc 'tables))
(setq tabone (vlax-invoke-method tabs 'add  ran 10 20))
(vlax-put-property tabone 'AllowAutoFit 1)
(vlax-put-property (vlax-get-property tabone 'borders ) 'enable 1)

路过

雷人

握手

鲜花

鸡蛋

评论 (0 个评论)

facelist doodle 涂鸦板

您需要登录后才可以评论 登录 | 注册

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-3-29 06:29 , Processed in 0.244630 second(s), 16 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

返回顶部