用股票軟體DDE輸出即時數據到EXCEL然後自動加總
可是目前的程式碼是"只要工作表內任一格有變動就加總一次"
想要改成"某一格(假設是A1)有變動時才加總一次",該怎麼改呢?

原程式碼是:
Private Sub Worksheet_Calculate()
Range("R2") = Range("R2") + [P2]
Range("S2") = Range("S2") + [Q2]
End Sub
文章關鍵字
那您要寫在 Change 事件裏,有引數 Target 可以讓您判別是否為指定的儲存格被異動。

Private Sub Worksheet_Change(ByVal Target As Range)

End Sub
不想唸物理了...
因為是初學者,所以下面的程式是copy別人的
然後針對自己懂的地方去修改,不懂的就自己查或問人
目前的問題是,工作表中有很多格子都有資料一直灌進來
只要有一個格子變動,他就把P2的量加總累積一次成為R2,但這不是我想要的
我想要比如說A1變動的時候,他才把P2的量加總累積一次到R2,請問該如何修改,謝謝你!


change事件如下:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "P2" Then '內盤量(P2)
Application.EnableEvents = False
Range("R2") = Range("R2") + Target '總量一直加總(R2=R2+P2)
Application.EnableEvents = True
End If


End Sub

Private Sub Worksheet_Calculate
Range("R2") = Range("R2") + [P2]
End Sub
文章分享
評分
評分
複製連結

今日熱門文章 網友點擊推薦!