作者psion (psion)
看板Office
標題[請益] dde怎樣儲存資料?
時間Wed Apr 23 01:06:34 2008
※ [本文轉錄自 Stock 看板]
作者: psion (psion) 看板: Stock
標題: [請益] dde怎樣儲存資料?
時間: Tue Apr 22 23:05:22 2008
我剛學excel
需要用dde擷取每分鐘大盤成交資訊(成交量買賣均張之類)
結果進來的資料無法儲存
比方說A1格是dde輸入的成交量
我想把每分鐘更新的資料依序儲存在A2以後的格子
可是發現worksheet_change無法被dde觸發(這是我上網找到的原因)
請問還有其他方法可以儲存dde資料嗎？
謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.70.6.55
1F：→ powerair:自行寫個VBA程式? :P 04/22 23:28
2F：→ psion:就是不知道怎麼寫啊 XD 想找範例都不知從何找起 04/22 23:39
3F：→ psion:worksheet_change也是別人教我的vba語法 04/22 23:39
我剛剛找上網到一種可能的寫法(利用dde觸發calculate)
想請高手指點一下
Private Sub Worksheet_Calculate()
Application.EnableEvents = False(請問這行跟下面True那行是必要的嗎？)
Range("A65536").End(xlUp).Offset(1, 0) = Range("A1").Value
Range("B65536").End(xlUp).Offset(1, 0) = Range("B1").Value
Range("C65536").End(xlUp).Offset(1, 0) = Range("C1").Value
Application.EnableEvents = True
End Sub
A1 B1 C1就是dde資料進來的格子
不知道這樣離正確的寫法還有多遠？
謝謝
--------------------------------------
※ 編輯: psion 來自: 203.70.6.55 (04/23 00:11)
※ 編輯: psion 來自: 203.70.6.55 (04/23 00:13)
4F：→ powerair:讀DDE提供的時間 變動時(分+1) 複製到你要的欄位 04/23 00:10
5F：→ psion:ㄟ 問題就在於要怎樣複製 ontime是不必要的 因為本來就是每 04/23 00:14
6F：→ psion:分鐘更新一次 所以光是dde值變動 還要搭配能觸發的事件 04/23 00:16
7F：→ psion:change不能觸發 calculate可以 這是我目前上網找到的心得 04/23 00:16
8F：→ psion:不過很感激您的回應 能請您寫出來讓我學習嗎 謝謝 04/23 00:17
9F：→ powerair:Trading版應該蠻多高手的 我只有觀念 不會寫 抱歉 :) 04/23 00:21
10F：→ psion:呵呵 Trading版人氣很低迷啊 04/23 00:25
11F：推 neant:轉去office板 看看 excel高手很多 04/23 00:38
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.70.6.55