[發問] 有關Excel VBA陣列使用方式...

帖子: 102
主題: 14
精華: 0
積分: 142
點名: 0
作業系統: Win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2016-7-31
最後登錄: 2020-3-21

論壇贊助勳章

13^#

發表於 2016-8-8 15:20 | 只看該作者

回復 12# 准提部林

是是! 我慢慢累積琢磨後再來向您請教，感謝您OvO

准提部林

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-22

12^#

發表於 2016-8-8 11:17 | 只看該作者

回復 11# VBALearner

程式方法少人用, 一定有它的道理,
微軟會提供不同方法去處理類似需求, 也有它的道理,
所以, 沒有好不好用問題, 只有適不適用?
VBA靠經驗, 慢慢摸, 慢慢磨, 花的時間夠多, 對于資料的處理, 其實就那幾個方法吧!

帖子: 102
主題: 14
精華: 0
積分: 142
點名: 0
作業系統: Win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2016-7-31
最後登錄: 2020-3-21

論壇贊助勳章

11^#

發表於 2016-8-7 22:47 | 只看該作者

回復 9# 准提部林

咦...這麼看來...Evaluate其實很好用欸?!!
application.worksheetfunction都免叫了
平常用習慣的工作表函數都直接用Evaluate呼叫也行，是吧?!(不科學阿xD~~~)
可是好像沒有很多人在用Evaluate，市面上的書都沒介紹它...
那想請問大大，除了上述功能外，有甚麼Evaluate常用的用法嗎OwO?
謝謝指教!

帖子: 102
主題: 14
精華: 0
積分: 142
點名: 0
作業系統: Win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2016-7-31
最後登錄: 2020-3-21

論壇贊助勳章

10^#

發表於 2016-8-3 11:15 | 只看該作者

回復 9# 准提部林

喔喔完全懂了! 感謝您仔細地回答!!!
原來array還有橫式跟直式的區別...我以為就只是存在記憶體裡面的資料而已，我愛用甚麼形狀貼上就用什麼形狀貼上......恩~總之感謝!

准提部林

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-22

9^#

發表於 2016-8-3 10:12 | 只看該作者

application.transpose
為〔轉置〕之用，原設array陣列為〔橫式〕，須轉置一次才能以〔直式-由上而下〕貼入欄位

application.evaluate
用來將〔文字字串〕的〔計算式〕，以工作表函數方式直接計算出其結果，
例如：MsgBox Application.Evaluate("=A1>A2")
因範例題中含〔文字〕的比較大小，VBA與公式的比較結果是不一樣的，
為了達到VBA排序的結果能與工作表排序結果一致，所以利用了Evaluate，
若是〔純數值〕的比較，直接使用 a>B 即可。

帖子: 102
主題: 14
精華: 0
積分: 142
點名: 0
作業系統: Win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2016-7-31
最後登錄: 2020-3-21

論壇贊助勳章

8^#

發表於 2016-8-3 00:10 | 只看該作者

本帖最後由 VBALearner 於 2016-8-3 00:19 編輯

回復 6# 准提部林

我會用sorting功能但是我的資料有標籤號碼我要排序完後還能讀取相對應的標籤號碼
而且我同時處理多種資料
所以不想貼到worksheet上面處理
然後剛樓上提到的方法我之前也沒想過xD
目的是要找多種資料排名前100大的資料交集的標籤號碼

另外，我可以問您application.transpose的問題嗎? 他好像只是單純貼上的功能?!!
還有application.evaluate，這好像有很多功能....? 其中一種好像是可以把字串變數值? 還有其他...? 不太懂
還請賜教!

帖子: 102
主題: 14
精華: 0
積分: 142
點名: 0
作業系統: Win10
軟體版本: Office2016
閱讀權限: 20
性別: 男
註冊時間: 2016-7-31
最後登錄: 2020-3-21

論壇贊助勳章

7^#

發表於 2016-8-3 00:07 | 只看該作者

本帖最後由 VBALearner 於 2016-8-3 00:18 編輯

回復 5# ML089

喔喔感謝您!!
把編碼加在後面的方法真是太聰明了!!!

准提部林

帖子: 2834
主題: 10
精華: 0
積分: 2890
點名: 0
作業系統: 〔略〕
軟體版本: 〔略〕
閱讀權限: 100
性別: 男
來自: 〔略〕
註冊時間: 2013-5-13
最後登錄: 2024-11-22

6^#

發表於 2016-8-2 20:45 | 只看該作者

EXCEL本身的排序功能最好用, 也適合大部份的資料型態(尤其是多欄位的資料),
為何不用它???

ML089

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

5^#

發表於 2016-8-2 19:48 | 只看該作者

回復 3# VBALearner

如何知道排名前5大數值的原始標籤(就是原本的1~10排序被打亂後如何呼叫)?

可以
1. 使用2個一維陣列，一個紀錄原始標籤(或順位)，一個紀錄資料陣列
2. 使用2維陣列，一維紀錄原始標籤(或順位)，另一維紀錄資料陣列
3. 或原始資料與原始標籤合併，
例如
1  33 合併為 33001
2  11 合併為 11002
3  44 合併為 44003
排序後取資料後3碼就是原始標籤(或順位)

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式