作者faceoflove56 (浪漫台三線)
看板Visual_Basic
標題[VBA ] 判斷後複製貼上
時間Sun Jun 4 18:15:41 2017
我的資料表格式
Ticker Date StockPrice
1111 6/1
1111 6/2
1111 6/3
2330 6/1
2330 6/2
2330 6/3
.
.
.
我想要把股票資料貼到各公司的資料表
想請問前輩如何判斷Ticker並複製資料一次貼上? (貼上我懂但不知如何做判斷)
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.42.38.249
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Visual_Basic/M.1496571343.A.F3F.html
1F：→ MOONRAKER: 當然是用if了 06/05 17:53
2F：→ faceoflove56: 我的想法是用for迴圈 後面接 06/05 22:43
3F：→ faceoflove56: if Ticker=xxxx then range().select 06/05 22:43
4F：→ faceoflove56: 不過這樣會造成程式運行過久，因為外面的迴圈要先跑 06/05 22:45
5F：→ faceoflove56: 股票代號(xxxx)，每檔股票都要重跑裡面的迴圈 06/05 22:46
6F：→ MOONRAKER: 這個我就不懂了 外面跑股票代號 裏面還有一層跑什麼 06/06 14:11
7F：→ MOONRAKER: 問題看起來有點複雜哩 06/06 14:11
8F：→ waiter337: Transpose 06/06 19:34
9F：→ waiter337: 但我說實在話,正確步驟為 06/06 19:34
10F：→ waiter337: 將所有符合的調件貼上公司位置(X) 06/06 19:35
11F：→ waiter337: 將符合條件的資料先匯入(陣列) #VBA陣列,不是F(X)陣列 06/06 19:36
12F：→ waiter337: 再用Transpose一次貼上 06/06 19:36
13F：→ waiter337: (O) 06/06 19:37
14F：→ waiter337: 兩者速度至少差幾千倍 06/06 19:37