我有一個單元,可以傳輸實時數據。我試圖給另一個單元添加一個計數器,這樣每次單個流數據單元發生變化時,計數器都會增加。 (進來的數據只是在增加,所以每次增加時,計數器應該增加)。Excel計數器用於帶流數據的Cell何時增加?
任何方式W/O VBA宏來做到這一點?否則VBA代碼將有所幫助。感謝
我有一個單元,可以傳輸實時數據。我試圖給另一個單元添加一個計數器,這樣每次單個流數據單元發生變化時,計數器都會增加。 (進來的數據只是在增加,所以每次增加時,計數器應該增加)。Excel計數器用於帶流數據的Cell何時增加?
任何方式W/O VBA宏來做到這一點?否則VBA代碼將有所幫助。感謝
把這個在Microsoft Excel對象的表。將第一個單元格設置爲正在更改的單元格,將第二個單元格設置爲您想要的計數器的位置。
Private Sub Worksheet_Change(ByVal Target As Range)
'First cell
If Target.Address = "$A$1" Then
'Second cell
ActiveWorkbook.Worksheets("Sheet1").Range("B1").Value = ActiveWorkbook.Worksheets("Sheet1").Range("B1").Value + 1
End If
End Sub
編輯:如果C1等於D1的變化。如果不相等,櫃檯不會漲價。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$1" Then
If ActiveWorkbook.Worksheets("Sheet1").Range("C1").Value = ActiveWorkbook.Worksheets("Sheet1").Range("D1").Value Then
ActiveWorkbook.Worksheets("Sheet1").Range("D2").Value = ActiveWorkbook.Worksheets("Sheet1").Range("D2").Value + 1
End If
End If
End Sub
這應該在worksheet_Change事件工作。 在這個例子中,數據流會在細胞(14,9)和計數器會在細胞(1,1)
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 14 And Target.Column = 9 Then
Range("A1").Value = Range("A1").Value + 1
End If
End Sub
你怎麼不流VBA實時數據? –
實時股票市場數據的DDE鏈接。所以這個單元格有一個函數,例如... = XYZ(AAPL,Last Price),並顯示當前價格 – RyanB