win10下测试ZWCAD2025操作excel不会出现类似问题

(defun c:testExcel (/ xl wbs wb shs sh rg) 
  (setq xl (vlax-get-or-create-object "Excel.Application")) 
  (setq wbs (vlax-get-property xl "WorkBooks")) 
  (setq wb (vlax-invoke-method wbs 'Add))
  (setq shs (vlax-get-property wb "Sheets")) 
  (setq sh (vlax-get-property shs 'Item "Sheet1")) 
  (print (vlax-get-property sh 'Name))
  (setq rg (vlax-get-property sh 'Range "A1"))
  (vlax-put-property rg 'Value2 1)
  (vlax-invoke-method wb 'Close :vlax-false)
  (vlax-invoke-method wbs 'Close)
  (vlax-invoke-method xl 'Quit)  ;是否退出都不影响下次打开excel的速度
)

1. 检查2025是否最新版本
2. 将能够复现问题的代码发出来