设为首页收藏本站

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

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 5385|回复: 7

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

  [复制链接]
发表于 2012-3-28 22:25:21 | 显示全部楼层 |阅读模式
小妹想通过 plant simulation 的命令控制相关的excel 文件的行为。但是一直被说语句错误。。。我是这样写的:- l# ^& j! O( W' [; I( L
kanal:= DDEConnect("Excel", "Cost");3 h- n7 S5 A  ~; m# q! V
DDEExecute(kanal,"Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value", 1000);' X: r% F) m2 O# z: b4 d. D
DDEExecute(kanal,"Worksheets("Cost").Range("B121").Value = 35", 1000);
9 o1 O: G8 ^) m6 N- aDDEDisconnect(kanal);) U. I9 B4 S3 Q% @9 g
系统一直报错,说语法有错。。。excecute 语句里的 cost那里有问题。。。。
8 m8 n4 s" i6 h0 a- {2 G4 Z7 j1 Y
( T/ F8 q4 _2 q* @请高手们不吝赐教~~小妹先谢过了~~~~
 楼主| 发表于 2012-3-29 16:43:02 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 17:47 编辑 2 E( d0 u9 _$ n, G* M: L! `
  s9 |" W3 n/ y
+ u5 d* \/ v  l# a
木有人理我么?( }$ U; ^! q6 t7 E  z. {/ \: z

2 N" B+ W8 Y6 X. B/ t. ~9 {我去理解了一下系统的报错。。。我觉得是因为系统把头两个引号看作了一对,导致 "Worksheets(" 成了输出的command,而后面那一串电脑就自然不认识了。。。。所以我就试着用中括号把command整个给括起来~写成了这样:
+ B, S  d' B- Q5 @; T: R4 |4 u6 U/ u0 v6 }( j
DDEExecute(kanal,"[Worksheets("Cost").Range("B129").Value = Worksheets("Cost").Range("G31").Value]", 1000);
' f0 w  }6 U; v8 Z- Q+ u
8 E$ ~. ~  t/ {4 i$ i" d& R7 e但是还是不行~~~有没有高人能给我指点一下~~我应该用一个什么方法把这样的command输入excel??
 楼主| 发表于 2012-3-29 17:48:15 | 显示全部楼层
 楼主| 发表于 2012-3-29 21:57:39 | 显示全部楼层
taoyifei2000 发表于 2012-3-29 21:37 1 H* f% L7 H' {" B; }" A
dde确实没用过,不过之前用过其它接口,不知道有没有共性。
8 z9 J0 r/ K2 W% x9 t. {; _; F8 N" m
触发语句是这样写的execute("        'cost'   ...
* S5 x0 k8 `1 v3 J( u& [2 c  f
谢谢你~~我试了~~不报错也不执行。。。电脑沉默了。。。
 楼主| 发表于 2012-3-29 22:03:28 | 显示全部楼层
本帖最后由 若叶繁茂 于 2012-3-29 22:10 编辑
9 k; r* |1 Y% I3 V) B4 z
taoyifei2000 发表于 2012-3-29 21:37
0 C% w% ?2 e( j* Ddde确实没用过,不过之前用过其它接口,不知道有没有共性。% J3 {: K1 p5 L+ B/ \+ O" g& f

% O3 y  C  v5 V# V触发语句是这样写的execute("        'cost'   ...
. j7 l3 @5 E3 W

& e  \7 ]: y% H: t+ C0 n/ A3 N) F不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde的热键连上。。。不知道这样行不行~~我去试试。。
" K8 V1 T4 E8 b6 d1 b: F5 k! k: G; D
5 l+ x, j+ {8 w2 A* w4 a. B诶不对阿。。。连热键是单纯的传数据啊。。。。哎呀。。。就结了。。。
发表于 2012-3-29 23:13:45 | 显示全部楼层
本帖最后由 五五 于 2012-3-29 23:16 编辑
1 i4 k# M4 v1 j3 K$ r
若叶繁茂 发表于 2012-3-29 22:03 7 _: a: l! C7 x3 G. ~& }
不过我又想了一个办法。。。我可以直接在plant simulation里面写表格。。。然后用dde ...

$ G! B9 b  t3 c+ ?& |) o( D; n. b2 h: {; {/ Z0 g3 B1 Y! {" y
我也没用过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
7 J+ z! M* n3 ?; `我也没用过DDE 目前研究中。。。不过如果你不嫌麻烦 可以用ActiveX操作excel表格的。。。我都是这么干的  ...
3 W7 f) C7 f  p) w( \8 s/ K* ?
谢谢~~前两天突然不能回贴。。。今天发现我的邮箱没激活。。。好奇怪。。。4 A- m, |6 s* ], A

! ~# i% m; v- d1 a我想向你详细请教一下activeX 的execute语句。。。我的目的是指挥excel运行一个宏。
6 f% `3 [' _8 w) e0 ]按照plant simulation自带的例子拖了一个activeX控件和一个link到我的network里面来。并且控件已改成了 excel.application。link 跟我的excel文件已经连接。于是我写了:5 K, u7 m/ P  w9 c
is, v. A( {! ]5 k& @8 b: `( ]' [6 e
        xl: any;
, j& h6 v, \. @- a5 ^( h5 B$ B$ g" t# Gdo  J" O( A2 V: @" \& H
        if ActiveX.active then
* Y2 H" ^4 J- w                xl:= activex.application;; C5 b3 S9 M9 |- i
                xl.call ("Macro_Reset");% A* p* r6 A7 ^
                activex.active:= false;9 j+ b5 H( c3 p2 T% q
        end;
! L  N( ~) U9 p# R       
9 s2 ]6 E* Z, B% G' k& T, t6 yend;
9 x8 K; J- h7 w% }. B
3 d, O+ z" e# A! s显然plant simulation 不认识 xl.call ("Macro_Reset"); 这句话。你之前有提到过一个activeX 的execute的语句~我在帮助里面木有找到,所以还是想问问~~
1 T/ j$ p' G3 O/ c
9 t" t' p( D* J; z期待你的恢复~~
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-4-29 23:38 , Processed in 0.017479 second(s), 14 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

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