 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
| 2 | 1/1 | 返回列表 |
| 查看: 2330 | 回復(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ù)此樓» 猜你喜歡
山東省面上項(xiàng)目限額評(píng)審
已經(jīng)有4人回復(fù)
-
一志愿北京化工大學(xué)070300 學(xué)碩336求調(diào)劑
已經(jīng)有5人回復(fù)
-
生物學(xué)071000 329分求調(diào)劑
已經(jīng)有4人回復(fù)
-
一志愿華中科技大學(xué)071000，求調(diào)劑
已經(jīng)有4人回復(fù)
-
生物學(xué)一志愿985，分?jǐn)?shù)349求調(diào)劑
已經(jīng)有4人回復(fù)
-
生物學(xué)調(diào)劑
已經(jīng)有4人回復(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ù)
» 本主題相關(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ù)
» 搶金幣啦！回帖就可以得到:
-
人生已過半程，不惑之年漸近，回望來時(shí)路，滿心皆是感恩。
+5/1755
-
青島高校2026招生碩士研究生
+5/770
-
中山大學(xué)環(huán)境材料團(tuán)隊(duì)招聘
+1/85
-
文獻(xiàn)分享，歡迎引用
+1/84
-
春天就該逛吃逛吃
+1/81
-
浙江大學(xué)侯陽教授團(tuán)隊(duì)誠聘博士后---高性能固態(tài)電解質(zhì)與固態(tài)電池器件設(shè)計(jì)
+1/81
-
散金幣，求好運(yùn)，祝面上順利！
+2/66
-
武漢工程大學(xué)資源生物技術(shù)課題組生物/環(huán)境/化工碩士、博士研究生招生及調(diào)劑
+2/20
-
中山大學(xué)院士團(tuán)隊(duì)微納器件、腦機(jī)接口方向博士招生、博后招聘
+1/18
-
2026年黃河科技學(xué)院納米功能材料研究所招聘
+2/16
-
【預(yù)碩】【預(yù)博】青島大學(xué)生物醫(yī)藥創(chuàng)新轉(zhuǎn)化
+1/15
-
寧波東方理工大學(xué)余鵬課題組2026年上海交大聯(lián)培博士生、博士后、科研助理招聘
+1/10
-
【博士招生】武漢科技大學(xué)招收材料、化工、環(huán)境、冶金類2026年“申請(qǐng)-考核”制博士生
+1/7
-
上海交大招收26年級(jí)秋季入學(xué)博士生，CET-6過，生物醫(yī)用材料方向（有高分子合成基礎(chǔ)）
+1/7
-
內(nèi)蒙古科技大學(xué)鐵電新能源材料與器件團(tuán)隊(duì)簡介
+1/6
-
招收化工與材料學(xué)科點(diǎn)研究生
+1/3
-
MDPI下IJMS投稿 pending editor decision 9天
+1/3
-
東北林業(yè)大學(xué)（211，雙一流）宋老師課題組招收高分子、化學(xué)、復(fù)合材料等方向研究生
+1/2
-
深圳大學(xué)蔡興科課題組博士后及研究助理招聘
+1/1
-
歡迎加入贛南師范大學(xué)先進(jìn)光電子研究中心
+1/1
★ ★
小木蟲(金幣+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ā)表 | |
|---|---|---|---|---|
|
[考研] 286求調(diào)劑 +10 | Faune 2026-03-21 | 10/500 |
|
|---|---|---|---|---|
|
[考研] 求調(diào)劑 +4 | 要好好無聊 2026-03-21 | 4/200 |
|
|
|
[考研] 【考研調(diào)劑】化學(xué)專業(yè) 281分，一志愿四川大學(xué)，誠心求調(diào)劑 +11 | 吃吃吃才有意義 2026-03-19 | 11/550 |
|
|
|
[考研] 317求調(diào)劑 +9 | 申子申申 2026-03-19 | 15/750 |
|
|
|
[考研] 求調(diào)劑 +3 | .m.. 2026-03-21 | 4/200 |
|
|
|
[考研] 材料學(xué)學(xué)碩080502 337求調(diào)劑-一志愿華中科技大學(xué) +4 | 順順順mr 2026-03-18 | 5/250 |
|
|
|
[考研] 306求調(diào)劑 +4 | chuanzhu川燭 2026-03-18 | 4/200 |
|
|
|
[考研] 南昌大學(xué)材料專碩311分求調(diào)劑 +6 | 77chaselx 2026-03-20 | 6/300 |
|
|
|
[考研] 085700資源與環(huán)境308求調(diào)劑 +12 | 墨墨漠 2026-03-18 | 13/650 |
|
|
|
[考研] 一志愿南昌大學(xué)，327分，材料與化工085600 +9 | Ncdx123456 2026-03-19 | 9/450 |
|
|
|
[考研] 一志愿中海洋材料工程專碩330分求調(diào)劑 +8 | 小材化本科 2026-03-18 | 8/400 |
|
|
|
[考研] 一志愿中南化學(xué)（0703）總分337求調(diào)劑 +8 | niko- 2026-03-19 | 9/450 |
|
|
|
[考研] 一志愿武理材料工程348求調(diào)劑 +3 | ￣^￣゜汗 2026-03-19 | 4/200 |
|
|
|
[考研] 289求調(diào)劑 +6 | 懷瑾握瑜l 2026-03-20 | 6/300 |
|
|
|
[考研] 一志愿 南京航空航天大學(xué)大學(xué) ，080500材料科學(xué)與工程學(xué)碩 +5 | @taotao 2026-03-20 | 5/250 |
|
|
|
[考研] 353求調(diào)劑 +3 | 拉鉤不許變 2026-03-20 | 3/150 |
|
|
|
[考研] 一志愿南理工085701環(huán)境302求調(diào)劑院校 +3 | 葵梓衛(wèi)隊(duì) 2026-03-20 | 3/150 |
|
|
|
[考研] 招收調(diào)劑碩士 +4 | lidianxing 2026-03-19 | 12/600 |
|
|
|
[考博] 申博26年 +3 | 八6八68 2026-03-19 | 3/150 |
|
|
|
[考研] 085601求調(diào)劑 +4 | Du.11 2026-03-16 | 4/200 |
|