返回列表下一主題上一主題發帖

[發問] DDE輸出資料後做即時四則運算的問題!!

xxxChange

小學生 Rank: 1

帖子: 3
主題: 1
精華: 0
積分: 10
點名: 0
作業系統: XP
軟體版本: SP3
閱讀權限: 10
註冊時間: 2012-9-18
最後登錄: 2012-9-23

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2012-9-22 16:41 | 只看該作者

[發問] DDE輸出資料後做即時四則運算的問題!!

請問各位，使用股票看盤軟體在DDE輸出資料至Excel檔後，要讓輸出後的資料與其他資料自動做四則運算要怎麼做？

比如說我輸出A1_台指期與A2_現貨的即時資料，然後要在另一個工作表(假設是sheet2)上自動顯示二者加減的結果並在正負數加上顏色（正數紅色，負數綠色）要怎麼做呢？

謝謝各位的回答!!

bugsfamily

小學生 Rank: 1

帖子: 17
主題: 3
精華: 0
積分: 33
點名: 0
作業系統: XP SP3
軟體版本: Office 2007
閱讀權限: 10
性別: 男
註冊時間: 2011-4-30
最後登錄: 2012-12-21

2^#

發表於 2012-9-22 20:24 | 只看該作者

If 今天價 > 昨天價 Then
range("A1").Value = 昨天價 - 今天價
range("A1").Font.Color = RGB(0, 100, 20)
Else
range("A1").Value = 昨天價 - 今天價
range("A1").Font.Color = RGB(255, 0, 0)
End If

TOP

xxxChange