|
|
马上注册,结识高手,享用更多资源,轻松玩转三维网社区。
您需要 登录 才可以下载或查看,没有帐号?注册
x
本帖最后由 woaishuijia 于 2016-1-27 19:55 编辑 E, g5 N( S6 G: V% ]2 H
6 A$ L5 z$ P9 m4 c# L4 Z' ]
AccessVBA中用下面代码建立一CAD进程,因为设为桌面上不可见,总是被选择样板中断而不能进行随后的程序,不知如何解决。请求帮助谢谢。% o4 k- s/ `" ~- `) C$ {, I B3 g
- Private acadApp As Object, acadDoc As Object! n+ \' l- ^* k5 K/ V) v; v
- private sub test()
' K& S5 ?9 d- O - On Error Resume Next$ _7 U Q, E3 Z2 z8 j- r
- Set xlApp = GetObject(, "Excel.Application")* ]# H" e) v; i& j, D: `
- If Err Then
* s3 ~: ~) S. [; M - Err.Clear
' v) r8 T5 v1 ~0 c - Set xlApp = CreateObject("Excel.Application")% T# r7 t# {6 `6 n8 S" N
- End If7 x) J; j5 e& i5 Z/ u# `: D
- xlApp.Visible = False
复制代码 0 ]0 d/ J) U& y/ [8 N
$ L, S. T8 \( D2 [: N8 I5 [ U% m/ D
|
|