摘要:
Option Explicit ValidationMode = True InteractiveMode = im_Batch Dim mdl ' the current model ' get the current active model Set mdl = ActiveModel If ( 阅读全文
posted @ 2017-06-20 14:35 徐正柱- 阅读(278) 评论(0) 推荐(0)
|
|||
摘要:
Option Explicit ValidationMode = True InteractiveMode = im_Batch Dim mdl ' the current model ' get the current active model Set mdl = ActiveModel If ( 阅读全文
posted @ 2017-06-20 14:35 徐正柱- 阅读(278) 评论(0) 推荐(0)
摘要:
Option Explicit Dim mdl ' the current model Set mdl = ActiveModel If (mdl Is Nothing) Then MsgBox "There is no Active Model" End If Dim HaveExcel Dim 阅读全文
posted @ 2017-06-20 14:32 徐正柱- 阅读(718) 评论(0) 推荐(0) |
|||