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

若叶繁茂

小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的：
# }% ~2 V. p; c( Tkanal:= DDEConnect("Excel", "Cost");
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
3 N1 W" c" d' J  QDDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
0 E1 g  k; z6 T' L6 L5 I. fDDEDisconnect(kanal);
系统一直报错，说语法有错。。。excecute 语句里的 cost那里有问题。。。。
  H& s$ k* M  \; J
3 Z! C( \. R5 M' s$ L请高手们不吝赐教~~小妹先谢过了~~~~

若叶繁茂

3 o- B7 k% h% Q% e

木有人理我么？

我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对，导致　"Worksheets("　成了输出的command，而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来～写成了这样：
8 H; g/ D# V3 D8 L# u9 n
9 w  I5 H2 |7 ?* @/ gDDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
% z. l5 O5 P7 f# p& t9 s
但是还是不行～～～有没有高人能给我指点一下～～我应该用一个什么方法把这样的command输入ｅｘｃｅｌ？？

若叶繁茂

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
dde确实没用过，不过之前用过其它接口，不知道有没有共性。

; m, J$ P& x) H2 Z4 f7 m( B1 a触发语句是这样写的execute("        'cost'   ...

) w+ f" h. N0 @0 a# P8 o5 ~6 t5 p谢谢你～～我试了～～不报错也不执行。。。电脑沉默了。。。

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
1 H' Y& q  Q! C5 k- k1 gdde确实没用过，不过之前用过其它接口，不知道有没有共性。

3 M1 R/ ^1 p0 u2 V6 D7 Y触发语句是这样写的execute("        'cost'   ...

6 v/ g+ w2 S8 V3 q' Q6 A8 k  C& U# P
2 k6 K# ?1 r; C& g不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ的热键连上。。。不知道这样行不行～～我去试试。。
4 R& @$ ?& L, A
1 q" |  U6 |3 F" n  U) q诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。

五五

若叶繁茂 发表于 2012-3-29 22:03
  i/ `# f+ f4 s3 ]  N. q6 k3 G0 @& U不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ ...

& i3 ~# \. E  X: V
* T4 p0 U9 y: R( T我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的 觉得效果还行。。。

五五

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

若叶繁茂

五五 发表于 2012-3-29 23:13
我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。

我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了：
# U6 f) I1 x- \* D& n  O' v/ J5 kis
        xl: any;
; L7 ]$ N3 H+ h" S' H6 x7 m7 \do
4 |- D* I) x9 P        if ActiveX.active then
/ f# ~" |6 x7 T& @" q. z  n, ?                xl:= activex.application;
4 _0 g7 l! i( `: |( t8 h                xl.call ("Macro_Reset");
                activex.active:= false;
! N: B! }1 g( |        end;
       
end;
7 A  {5 ?/ V" j& Y/ @' W" y
/ L! W( z) Q) I; D. w  p/ C1 d显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到，所以还是想问问~~

1 H% ^$ J4 I; g1 \: c) H3 v期待你的恢复~~