 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 2 | 1/1 | 返回列表 |
| 查看: 2329 | 回復(fù): 1 | |||
[交流]
excel VBA 控制 aspen plus
|
|
在excel控制 aspen plus simulation的時(shí)候，想在excel某一單元格循環(huán)賦值，然后通過aspen的solver返回計(jì)算結(jié)果，并把計(jì)算結(jié)果copy到excel指定欄。 問題是：想用VBA的for語句，循環(huán)調(diào)用aspen workbook的宏，來執(zhí)行“運(yùn)行模型”命令�？墒欠祷氐慕Y(jié)果全部一樣，而且是最后一次賦值后計(jì)算所得的結(jié)果，之前的被覆蓋了。請(qǐng)高手解決這個(gè)問題，謝謝。 語句如下： Option Explicit Option Base 1 Sub arr() Dim x As Integer, y As Integer, i As Integer Dim arr（4, 2) As Double For x = 1 To 4 For y = 1 To 2 arr(x, y) = Cells(x, y + 11) ' 把單元格區(qū)域的數(shù)據(jù)賦值到數(shù)組 Next y Next x For i = 1 To 4 Cells(2, 2) = arr(i, 1) ' assign row 1, col i of arr to cells(2,2) ‘把數(shù)組的值順序賦值給 Cells(3, 2) = arr(i, 2) ' assign row 2, col i of arr to cells(3,2) ’指定單元格 ASWRunSynchActiveSimulation ‘調(diào)用aspen plus進(jìn)行計(jì)算 Cells(i, 13) = Cells(4, 2).Value ’ 結(jié)果賦值到指定列 Next i End Sub Sub ASWRunSynchActiveSimulation() Application.Run ("AspenSimulationWorkbook.xla!ASWRunSynchActiveSimulation"  End Sub [ Last edited by zhchh008 on 2011-11-2 at 07:29 ] |
回復(fù)此樓» 猜你喜歡
求調(diào)劑院校信息
已經(jīng)有4人回復(fù)
-
085600材料與化工306
已經(jīng)有4人回復(fù)
-
286求調(diào)劑
已經(jīng)有10人回復(fù)
-
328求調(diào)劑，英語六級(jí)551，有科研經(jīng)歷
已經(jīng)有9人回復(fù)
-
一志愿北京化工大學(xué)070300 學(xué)碩336求調(diào)劑
已經(jīng)有4人回復(fù)
-
286分人工智能專業(yè)請(qǐng)求調(diào)劑愿意跨考！
已經(jīng)有8人回復(fù)
-
資源與環(huán)境 調(diào)劑申請(qǐng)(333分)
已經(jīng)有5人回復(fù)
-
280求調(diào)劑
已經(jīng)有12人回復(fù)
-
269專碩求調(diào)劑
已經(jīng)有5人回復(fù)
-
材料學(xué)碩301分求調(diào)劑
已經(jīng)有7人回復(fù)
» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:
- aspen plus做萃取的模擬
已經(jīng)有4人回復(fù)
- 幫忙分析下ASPEN PLUS 11.1中的這個(gè)錯(cuò)誤報(bào)告
已經(jīng)有10人回復(fù)
- aspen plus下載
已經(jīng)有8人回復(fù)
- aspen plus練習(xí)三：根據(jù)實(shí)驗(yàn)數(shù)據(jù)利用aspen plus回歸二元交互參數(shù)實(shí)例
已經(jīng)有19人回復(fù)
- aspen plus第17章的學(xué)習(xí)
已經(jīng)有5人回復(fù)
- 【討論】Aspenplus環(huán)己烷生產(chǎn)過程模擬-涉及循環(huán)物流
已經(jīng)有24人回復(fù)
» 搶金幣啦！回帖就可以得到:
-
電力全國重點(diǎn)實(shí)驗(yàn)室雙一流A類長(zhǎng)江學(xué)者團(tuán)隊(duì)招2026年全日制博士1名（4月3日截止）
+2/100
-
招收調(diào)劑生，動(dòng)物醫(yī)學(xué)專業(yè)
+1/84
-
文獻(xiàn)分享，歡迎引用
+1/84
-
飄在美國，有點(diǎn)想家
+1/51
-
江蘇科技大學(xué)能源材料化學(xué)課題組郭興梅教授招收博士研究生1-2名
+1/46
-
天津城建大學(xué)招收物理、化學(xué)或者生物調(diào)劑生一名，前往天津大學(xué)聯(lián)合培養(yǎng)
+1/37
-
剛剛工作不久的孤獨(dú)感
+1/34
-
上海交大化院功能大分子團(tuán)隊(duì)招2026年碩士、聯(lián)培、博士后
+1/31
-
哈工大鄭州高等研究院劉紹琴與查正寶教授課題組誠招合成生物學(xué)背景相關(guān)的優(yōu)秀人才加盟
+1/31
-
武漢工程大學(xué)資源生物技術(shù)課題組生物/環(huán)境/化工碩士、博士研究生招生及調(diào)劑
+2/30
-
下周見一個(gè)合作者，應(yīng)該問些什么
+1/19
-
深圳信息職業(yè)大學(xué)招聘聯(lián)合培養(yǎng)碩博研究生（急）
+1/7
-
福州大學(xué)國家級(jí)人才湯育欣教授課題組2026年招收”申請(qǐng)考核制“儲(chǔ)能電池方向博士研究生
+1/6
-
湖北大學(xué)材料學(xué)招26級(jí)碩士研究生若干名
+1/6
-
寧波東方理工大學(xué)余鵬課題組2026年上海交大聯(lián)培博士生、博士后、科研助理招聘
+1/6
-
26年申博自薦-計(jì)算機(jī)視覺
+1/5
-
雙一流天津工業(yè)大學(xué)電信學(xué)院李鴻強(qiáng)教授招收2026年申請(qǐng)審核制博士3名
+1/3
-
【第三輪招生】澳科大誠招2026秋全獎(jiǎng)博士研究生（納米醫(yī)學(xué)/生物材料，3月31號(hào)截止）
+1/3
-
中國科學(xué)院過程工程研究所助理研究員（正式職工）和博士后招聘啟事
+1/2
-
211/雙一流石河子大學(xué)化學(xué)化工學(xué)院--電催化，CO2捕集和轉(zhuǎn)化
+1/2
★ ★
小木蟲(金幣+0.5):給個(gè)紅包，謝謝回帖
zhchh008(金幣+1): 那是輸入錯(cuò)誤，用F8測(cè)試過，可以正確的將數(shù)據(jù)賦給指定單元格，謝謝 2011-11-02 07:29:21
臭水溝(金幣+1): 謝謝交流~~ 2011-11-02 09:23:00
小木蟲(金幣+0.5):給個(gè)紅包，謝謝回帖
zhchh008(金幣+1): 那是輸入錯(cuò)誤，用F8測(cè)試過，可以正確的將數(shù)據(jù)賦給指定單元格，謝謝 2011-11-02 07:29:21
臭水溝(金幣+1): 謝謝交流~~ 2011-11-02 09:23:00
|
Cells(2, 2) = arr(i, 1) ' assign row 1, col i of arr to cells(2,2) ‘把數(shù)組的值順序賦值給 Cells(3, 2) = arr(i, 2) ' assign row 2, col i of arr to cells(2,2) ’指定單元格 這個(gè)地方有問題！ |
2樓2011-11-02 07:19:18
相關(guān)版塊跳轉(zhuǎn)
我要訂閱樓主 zhchh008 的主題更新
| 2 | 1/1 | 返回列表 |
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 280求調(diào)劑 +11 | 咕嚕曉曉 2026-03-18 | 12/600 |
|
|---|---|---|---|---|
|
|
[考研] 化學(xué)工程321分求調(diào)劑 +18 | 大米飯！ 2026-03-15 | 22/1100 |
|
|
|
[考研] 311求調(diào)劑 +3 | 勇敢的小吳 2026-03-20 | 3/150 |
|
|
|
[考研] 313求調(diào)劑 +4 | 肆叁貳壹22 2026-03-19 | 4/200 |
|
|
[考研] 求調(diào)劑 +3 | .m.. 2026-03-21 | 4/200 |
|
|
|
[考研] 南昌大學(xué)材料專碩311分求調(diào)劑 +6 | 77chaselx 2026-03-20 | 6/300 |
|
|
|
[考研] 二本跨考鄭大材料306英一數(shù)二 +3 | z1z2z3879 2026-03-17 | 3/150 |
|
|
|
[考研] 求調(diào)劑 +3 | Ma_xt 2026-03-17 | 3/150 |
|
|
|
[考研] 材料 336 求調(diào)劑 +3 | An@. 2026-03-18 | 4/200 |
|
|
|
[考研] 304求調(diào)劑 +7 | 司空. 2026-03-18 | 7/350 |
|
|
|
[考研] 085600材料與化工 +8 | 安全上岸！ 2026-03-16 | 8/400 |
|
|
|
[考研] 中南大學(xué)化學(xué)學(xué)碩337求調(diào)劑 +3 | niko- 2026-03-19 | 6/300 |
|
|
|
[考研] 261求B區(qū)調(diào)劑，科研經(jīng)歷豐富 +3 | 牛奶很忙 2026-03-20 | 4/200 |
|
|
|
[考研] 求調(diào)劑 +3 | eation27 2026-03-20 | 3/150 |
|
|
|
[考研] 環(huán)境工程調(diào)劑 +9 | 大可digkids 2026-03-16 | 9/450 |
|
|
|
[考研] 一志愿中國海洋大學(xué)，生物學(xué)，301分，求調(diào)劑 +5 | 1孫悟空 2026-03-17 | 6/300 |
|
|
|
[考研]
 0854，計(jì)算機(jī)類招收調(diào)劑
+3
|
胡辣湯放糖 2026-03-15 | 6/300 |
|
|
|
[考研] 293求調(diào)劑 +11 | zjl的號(hào) 2026-03-16 | 16/800 |
|
|
|
[考研] 302求調(diào)劑 +4 | 小賈同學(xué)123 2026-03-15 | 8/400 |
|
|
|
[考研] 一志愿，福州大學(xué)材料專碩339分求調(diào)劑 +3 | 木子momo青爭(zhēng) 2026-03-15 | 3/150 |
|