设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 5622|回复: 7

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

  [复制链接]
发表于 2012-3-28 22:25:21 | 显示全部楼层 |阅读模式
小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的:
+ }1 q5 g$ v* I) fkanal:= DDEConnect("Excel", "Cost");1 G7 B4 n$ t# H0 e( B4 {3 T8 T9 i; |
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);0 u  H; }0 P0 o6 c  x
DDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);! c$ D% E& U- x" a5 M' `6 U; b/ O$ W
DDEDisconnect(kanal);" \% Y! j( ^+ ]- s, T9 _# q2 `
系统一直报错,说语法有错。。。excecute 语句里的 cost那里有问题。。。。5 x, ?' s# o% o# A: P; r6 G

  Y4 {$ f5 g% W% [$ x: I请高手们不吝赐教~~小妹先谢过了~~~~
 楼主| 发表于 2012-3-29 16:43:02 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 17:47 编辑 7 \, M6 e' `% k% p! D! r- s

; Q+ j4 M  j3 X3 F- f
0 K: F. m+ W5 g% O+ a( C# `# j木有人理我么?
4 `0 r2 L3 j8 o9 H, a5 T$ f5 d# W' k' z4 G( m- T0 R8 D2 A9 e/ C
我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对,导致 "Worksheets(" 成了输出的command,而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来~写成了这样:* z8 |5 h1 i3 _( ~4 |+ N9 K

5 I2 @2 R( g- T. K( M7 ]DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
8 m! V: ~' [- @: O( `/ R# m0 [' O  D3 a0 `, h! W0 _  s% c1 d% P
但是还是不行~~~有没有高人能给我指点一下~~我应该用一个什么方法把这样的command输入excel??
 楼主| 发表于 2012-3-29 17:48:15 | 显示全部楼层
 楼主| 发表于 2012-3-29 21:57:39 | 显示全部楼层
taoyifei2000 发表于 2012-3-29 21:37 ( z+ Z7 e2 ~7 b5 u& `
dde确实没用过,不过之前用过其它接口,不知道有没有共性。, x: S; n% G5 l6 f

2 B  Z' Y8 t1 `! G( v触发语句是这样写的execute("        'cost'   ...

5 I! J" T: g/ v# r3 F3 W; d谢谢你~~我试了~~不报错也不执行。。。电脑沉默了。。。
 楼主| 发表于 2012-3-29 22:03:28 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 22:10 编辑
! l9 u/ g9 I$ [0 ?# l( y
taoyifei2000 发表于 2012-3-29 21:37 ' J5 D/ x& ~6 w# E. T8 N  i5 T
dde确实没用过,不过之前用过其它接口,不知道有没有共性。+ i  I) J# o2 h  h6 b3 g8 L9 i
6 V5 @9 ?8 L( t' W* w! E% O/ Y
触发语句是这样写的execute("        'cost'   ...

8 y4 U/ X% T0 G9 n) r
! Z. x3 p& O, @7 [! ]) T不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde的热键连上。。。不知道这样行不行~~我去试试。。
" y* T/ W: f( l8 C% `: ]: D; e! d
0 o2 S& r$ I0 X0 Z5 R3 w诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。
发表于 2012-3-29 23:13:45 | 显示全部楼层
本帖最后由 五五 于 2012-3-29 23:16 编辑
" e: ~  t: S/ J
若叶繁茂 发表于 2012-3-29 22:03 & h4 @! i! C' q/ v3 s: U  R( c4 `6 C
不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde ...

+ t& }6 g% [$ i) V
+ ~" b, Y: @& k! g8 n我也没用过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
8 M2 D0 M/ _1 X7 W我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...

6 O' s1 {4 U& F& @2 s  J0 [3 S. c谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。7 a/ v7 P6 N* o4 I" B
% U" o% ~% l! Q2 E3 ?: i1 d
我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
5 R+ a% ^, c  ~) ?; Q) M( D- x按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了:( J. t( [8 o0 F
is
4 y4 s  D6 S* B& B. S8 J7 X        xl: any;
9 @4 E; T  x7 vdo2 a& ^$ e+ U! z0 d
        if ActiveX.active then
* V& S' `$ Y* U4 O& V( C                xl:= activex.application;
  Z" A5 G- a% ~( w, A+ U, G+ b                xl.call ("Macro_Reset");
# U1 Z! O2 ^# l7 W  Q% `                activex.active:= false;: q" s, \) E; W0 K
        end;
" b' \2 @" S9 L        % d2 O! o6 G4 ?/ k# @0 x8 x
end;
8 Q7 F2 P2 `1 @6 F: v+ b. [! x' Z1 M; P: r; Q8 s; K
显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到,所以还是想问问~~
. Y& v; |7 k. i3 {* b8 `- {9 g1 E5 m4 ]
期待你的恢复~~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-7-26 18:58 , Processed in 0.013508 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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