请教关于em-Plant做client的DDEExecute的应用

若叶繁茂

小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的：
kanal:= DDEConnect("Excel", "Cost");
' ~1 q4 _* l$ E# H% gDDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
5 T/ L8 g* h5 u# u' oDDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
3 I$ T2 H. p3 I; \  G7 F/ w+ lDDEDisconnect(kanal);
系统一直报错，说语法有错。。。excecute 语句里的 cost那里有问题。。。。
5 p6 a) _- G' z& f/ R$ k
请高手们不吝赐教~~小妹先谢过了~~~~

若叶繁茂

4 w  C( Q/ j% ^: X
木有人理我么？

+ E5 `9 s8 r( q  j- R" I/ n我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对，导致　"Worksheets("　成了输出的command，而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来～写成了这样：
7 q9 ~5 Y8 \# H3 t4 a# z  |
" R' u, R. J) jDDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
: w/ a6 C$ L7 r# A
但是还是不行～～～有没有高人能给我指点一下～～我应该用一个什么方法把这样的command输入ｅｘｃｅｌ？？

若叶繁茂

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
8 u. |& x$ W, m+ Y) Ldde确实没用过，不过之前用过其它接口，不知道有没有共性。

触发语句是这样写的execute("        'cost'   ...

8 Z4 _: w2 E( {7 B谢谢你～～我试了～～不报错也不执行。。。电脑沉默了。。。

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
4 m5 y) N- y% H+ E" x* xdde确实没用过，不过之前用过其它接口，不知道有没有共性。
( y8 P1 M0 A" u4 k. E' {
7 F' r9 \; {+ c/ y: d触发语句是这样写的execute("        'cost'   ...

不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ的热键连上。。。不知道这样行不行～～我去试试。。

诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。

五五

! E1 @2 Z! Z* L, f$ y

若叶繁茂 发表于 2012-3-29 22:03
不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ ...

. {! ^0 r5 q* L7 t: v) g! c
我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的 觉得效果还行。。。

五五

还有我按照你的语句写了一下 电脑并不沉默 但是只是单纯的把 Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value 这一段内容作为字串赋值到excel里面了 囧。。。不知道为啥。。。

若叶繁茂

五五 发表于 2012-3-29 23:13
8 l. E( m& P) U7 ]. V+ L我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。
/ |" m& X/ D; m- S
, Y; K# e' b& q/ |! g8 l我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
1 s3 l; J* e( D1 e按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了：
" \7 t+ ~& [$ d( s; Iis
- ]7 I4 \7 }" N  i3 ?* g  z" f. e        xl: any;
do
        if ActiveX.active then
) \! X' s3 H, C% H; `$ f* E3 `) P                xl:= activex.application;
                xl.call ("Macro_Reset");
                activex.active:= false;
7 @! u( [* J$ E' J        end;
0 ]1 y3 L+ R- p  _       
! P$ q* z& p' G3 q6 h! p) Cend;
0 F, Y* K7 a$ w7 ^7 H% V
显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到，所以还是想问问~~
" F) z0 C+ Z$ A
期待你的恢复~~