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

若叶繁茂

小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的：
kanal:= DDEConnect("Excel", "Cost");
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);
4 z* Q. \  h0 F" i- _2 GDDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
DDEDisconnect(kanal);
4 T1 Y4 o" x0 j, X系统一直报错，说语法有错。。。excecute 语句里的 cost那里有问题。。。。
+ C8 D6 ^4 K: ?9 \2 A/ j
请高手们不吝赐教~~小妹先谢过了~~~~

若叶繁茂

' H7 U  G2 j% B. o! B# P
/ }4 e% h  ?; M9 O# d% B木有人理我么？
3 G0 E# R) |. t$ c- H
我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对，导致　"Worksheets("　成了输出的command，而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来～写成了这样：
4 U$ K- h: a" f7 {/ x
DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);

但是还是不行～～～有没有高人能给我指点一下～～我应该用一个什么方法把这样的command输入ｅｘｃｅｌ？？

若叶繁茂

若叶繁茂

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

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

谢谢你～～我试了～～不报错也不执行。。。电脑沉默了。。。

若叶繁茂

taoyifei2000 发表于 2012-3-29 21:37
9 M1 r5 w- Q# g# V8 kdde确实没用过，不过之前用过其它接口，不知道有没有共性。

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

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

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

五五

2 L! N1 a8 e1 S% L' r$ W. Z  R4 v

若叶繁茂 发表于 2012-3-29 22:03
  p6 S* y/ F+ U4 c* M! g3 y: I不过我又想了一个办法。。。我可以直接在ｐｌａｎｔ　ｓｉｍｕｌａｔｉｏｎ里面写表格。。。然后用ｄｄｅ ...

我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的 觉得效果还行。。。

五五

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

若叶繁茂

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

8 Y7 m9 J* \, v3 o# G* F* ^+ e谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。
$ e) Q! m  @% b1 l' f3 d8 |
我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
" {+ k- T: @8 F' x! q按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了：
6 v( u2 X: {* O  N+ e+ O& J- v- [3 {is
8 p( a2 M8 \" u- u- {4 a  }% m        xl: any;
0 w( l& t/ k$ d$ qdo
        if ActiveX.active then
$ ?$ C$ Q  d8 S' ~7 ~0 O2 m                xl:= activex.application;
                xl.call ("Macro_Reset");
                activex.active:= false;
% T  M; i2 y' O" A1 m) S" C7 n" v        end;
3 p' w( z0 ^' m8 M; J       
( W& x4 p: c8 s, Nend;
8 y: J- c' F, G- H5 i/ K% H
显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到，所以还是想问问~~
. c$ R: b) N0 w, c( G
: Q# ~  l0 U) q5 s3 w  b期待你的恢复~~