设为首页收藏本站

最大的系统仿真与系统优化公益交流社区

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 5646|回复: 7

[求助] 请教关于em-Plant做client的DDEExecute的应用

  [复制链接]
发表于 2012-3-28 22:25:21 | 显示全部楼层 |阅读模式
小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的:
- G# k/ w9 L! F' q; o0 ^/ O1 \kanal:= DDEConnect("Excel", "Cost");2 {- v* T) \! d1 P  _  C$ n
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);' G" \: u" J3 l: D2 H( Y4 s
DDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
$ p, ^. u* d  X; E# [DDEDisconnect(kanal);; T5 t! J, H) `: |) Q8 G: Z
系统一直报错,说语法有错。。。excecute 语句里的 cost那里有问题。。。。
( D8 `8 y' Y/ _$ W' [- f4 `6 k4 n- n2 J
请高手们不吝赐教~~小妹先谢过了~~~~
 楼主| 发表于 2012-3-29 16:43:02 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 17:47 编辑 1 j3 R( m( b, n- j% o) x2 g0 w

& l6 a' @) h4 s( n) @
  M: T- o4 q9 H- B, O% j5 o木有人理我么?& P6 F- I$ Y5 d- ~

6 ~6 ^& `/ x- I9 @我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对,导致 "Worksheets(" 成了输出的command,而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来~写成了这样:
& a) j5 o& w1 p) n$ l. M
  s% U! R, o- G7 hDDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
  H" X' S6 q. K6 ?: ?+ S3 P6 C/ ]5 c9 L8 e1 l
但是还是不行~~~有没有高人能给我指点一下~~我应该用一个什么方法把这样的command输入excel??
 楼主| 发表于 2012-3-29 17:48:15 | 显示全部楼层
 楼主| 发表于 2012-3-29 21:57:39 | 显示全部楼层
taoyifei2000 发表于 2012-3-29 21:37 4 `3 [- @! o4 P
dde确实没用过,不过之前用过其它接口,不知道有没有共性。
) ~' \6 O7 N$ T
. o( X& V+ H3 P  ~7 y触发语句是这样写的execute("        'cost'   ...

0 n' p: R# ?# {. x2 y/ W% b( p谢谢你~~我试了~~不报错也不执行。。。电脑沉默了。。。
 楼主| 发表于 2012-3-29 22:03:28 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 22:10 编辑
+ b  D5 `- ]0 I) o+ R
taoyifei2000 发表于 2012-3-29 21:37 # r* W1 e  m8 J! Q  p  H" H
dde确实没用过,不过之前用过其它接口,不知道有没有共性。" l. M7 @9 n8 v1 O( i" a& [+ }% |
; H) g, U& q" ~* ?0 i( r* ~- m3 Y
触发语句是这样写的execute("        'cost'   ...
# {7 X9 W7 f' {( u

2 x+ x, S/ X& Z5 m) o不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde的热键连上。。。不知道这样行不行~~我去试试。。; F& T$ T! c4 P! a5 f( w

4 m# G) i& Q) m4 N3 B+ P( [; o( L诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。
发表于 2012-3-29 23:13:45 | 显示全部楼层
本帖最后由 五五 于 2012-3-29 23:16 编辑
: b7 m$ L" R# b! b
若叶繁茂 发表于 2012-3-29 22:03 * r5 m: }5 o) |, m5 B$ N+ n
不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde ...

8 P5 `; `  E' X/ Y! r. ?* b
2 g# K6 O$ _0 E: l  \. L1 s, O8 C我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的 觉得效果还行。。。
发表于 2012-3-29 23:15:32 | 显示全部楼层
还有我按照你的语句写了一下 电脑并不沉默 但是只是单纯的把 Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value 这一段内容作为字串赋值到excel里面了 囧。。。不知道为啥。。。
 楼主| 发表于 2012-4-2 20:50:13 | 显示全部楼层
五五 发表于 2012-3-29 23:13 5 y% X4 T6 x- i3 t
我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

% p! p4 j5 k4 C+ h谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。5 x; B: C6 _6 k8 n) N) S. f0 r
  \6 _9 z7 a/ y
我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
* V! @! p0 r4 K9 H& Q1 {/ J1 d按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了:7 Q1 i' n1 Y+ A
is
2 L5 m& D$ [5 Z0 w+ X/ x+ P        xl: any;
6 D, r" `1 W; Z8 w- ?do) j& R4 p0 `: K. |) _- e0 m
        if ActiveX.active then. l6 X! ]; {1 u, \$ M8 u/ _1 }
                xl:= activex.application;
3 U+ K9 ]) N  T' E. O                xl.call ("Macro_Reset");
, s( n: y, z$ l3 U# V                activex.active:= false;
3 x" j( c+ Z+ f0 E        end;
2 o/ B! N2 z, P9 c: R9 y0 k$ v       
- V8 I1 t& m& k# D# Wend;
! D, H% A8 t' Y( s: l( l7 r) s
+ i# W; F1 U7 I显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到,所以还是想问问~~/ s! \, ]) |0 ?& q9 x
( d& q$ ^( w; i% Q* S
期待你的恢复~~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|手机版|SimulWay 道于仿真   

GMT+8, 2026-8-5 23:05 , Processed in 0.015588 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表