capturing market data

[Rastis]

Hi Folks,
I'm looking to capture the movement (highs and lows) of a market In-play. Is there a function, or Excel formulae etc, or some other means that someone could recommend please?
Cheers

[Captain Sensible]

Try adding this to a worksheet , it should stick starting odds in AH , Lowest in AI and highest in AJ. Takes the price from last matched price


Private Sub Worksheet_Change(ByVal Target As Range)
Dim iRow As Integer
Dim iCol As Integer
Dim cell As Object

For Each cell In Target
iRow = cell.Row
iCol = cell.Column


' Update Max and Min Back Values
If Cells(2, 5) = "In Play" And iCol = 15 And iRow > 4 And iRow < 46 Then

Application.EnableEvents = False
If IsEmpty(Range("AJ" & iRow).Value) Then Range("AJ" & iRow).Value = 0
If IsEmpty(Range("AI" & iRow).Value) Then Range("AI" & iRow).Value = 1001
If IsEmpty(Range("AH" & iRow).Value) Then Range("AH" & iRow).Value = Range("O" & iRow).Value

If Not IsEmpty(cell.Value) Then
Range("AG" & iRow).Value = Range("O" & iRow).Value
If cell.Value < Range("AI" & iRow).Value And cell.Value > 1 Then Range("AI" & iRow).Value = cell.Value
If cell.Value > Range("AJ" & iRow).Value And cell.Value < 1001 Then Range("AJ" & iRow).Value = cell.Value
End If

Application.EnableEvents = True
End If



Next cell

End Sub

[NorthView]

Wish there was a tick up facility here to show appreciation of a post but in its absence, thanks very much CS, this is also what I've been looking for.

[Askew]

Hello Rasits! The suggestion of "Captain Sensible" is very valuable for capturing market data. I was also looking for such tool. I use it this is very helpful. try it.

[Livermore]

It just works! - my sincere appreciation to you for sharing this on the Forum.

[Captain Sensible]

As much as I'd love to take credit for the code, it was a guy called phrenetic that posted it up ages ago. I'm just passing it on as I've found it useful in alot of my stuff.

http://gruss-software.co.uk/forum/viewtopic.php?t=1885