帖子: 220
主題: 55
精華: 0
積分: 282
點名: 0
作業系統: window
軟體版本: office2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2010-8-30
最後登錄: 2023-10-18

論壇贊助勳章論壇榮譽勳章

1^# 跳轉到 » 正序看帖

打印

字體大小: tT

發表於 2010-9-3 20:58 | 只看該作者

如何用陣列寫大量資料運算

如附件
於sheet1的b欄有300筆資料
於f欄也有300比資料
希望b欄乘上f欄的答案顯示於h欄
如何用陣列寫?

990903-1.rar (5.9 KB)

樓主熱帖

gstone

中學生 Rank: 2

帖子: 15
主題: 1
精華: 0
積分: 60
點名: 0
作業系統: XP
軟體版本: Office 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2010-9-22
最後登錄: 2016-11-8

7^#

發表於 2010-12-14 00:57 | 只看該作者

試出不用定義名稱的寫法:
Range("H2:H" & [B65536].End(xlUp).Row) = [B2:B65536*F2:F65536]

雖不明其因，但計算結果及速度和定義名稱一樣。

TOP

gstone

中學生 Rank: 2

帖子: 15
主題: 1
精華: 0
積分: 60
點名: 0
作業系統: XP
軟體版本: Office 2003
閱讀權限: 20
性別: 男
來自: 台灣
註冊時間: 2010-9-22
最後登錄: 2016-11-8

6^#

發表於 2010-12-14 00:27 | 只看該作者

謝謝Hsieh版主
已了解中括號有限制。

剛才測試6萬多筆資料
若是變動範圍
用定義名稱比用迴圏寫入陣列
速度快了5、6倍
呵~很好的方法~~~

TOP

Hsieh

超級版主 Rank: 8 Rank: 8

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 90
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2024-4-18

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

5^#

發表於 2010-12-12 22:56 | 只看該作者

回復 4# gstone

中括號是OLE寫法
必須是常數名稱
不可使用變數
所以變動範圍的話你必須使用定義名稱
定義3個名稱
x=OFFSET(Sheet1!$B$2,,,COUNTA(Sheet1!$B:$B),)
y=OFFSET(Sheet1!$F$2,,,COUNTA(Sheet1!$B:$B),)
z=OFFSET(Sheet1!$H$2,,,COUNTA(Sheet1!$B:$B),)

程式碼
Sub nn()
[Z].Value = [x*y]
End Sub

學海無涯_不恥下問

TOP

gstone