如何激活excel的某张工作表？
(setq f1 (getfiled "选择excel文件" "d:/" "xls;xlsx" 8) f1 (findfile f1))(cond
((setq exlib (findfile "c:\\Program Files\\Microsoft Office\\Office11\\Excel.exe"))exlib)
((setq exlib (findfile "c:\\Program Files\\Microsoft Office\\Office12\\Excel.exe"))exlib)
((setq exlib (findfile "c:\\Program Files\\Microsoft Office\\Office14\\Excel.exe"))exlib)
)
(if (null mx-acos) (vlax-import-type-library :tlb-filename exlib :methods-prefix "mx-" :properties-prefix "mx-" :constants-prefix "mx-"))
(setq xlobj (vlax-create-object "excel.application") wbobj (vlax-invoke-method (vlax-get-property xlobj 'WorkBooks) 'Open f1))
(setq sheetobj (mx-get-activesheet xlobj))
最后一句话返回了当前激活的工作表，如果想要激活另外一张表，比如说sheet3，用什么语句，大神请帮帮忙。
页:
[1]