Your "oldlo" will be updated with every iteration (ditto "oldhi").
IF bid<oldlo then oldlo=bid
IF askoldhi then oldhi=ask

If you need "lo"/"hi" then put them inside their respective IF statements.
--
Regards;
Rob
------------------------------------------------------------------------
"rnrss" wrote in message
...

Hello everyone...

I am trying to capture the highest high and lowest low in streaming
data. What I have done is not working correctly and I am at a loss how
to correct it, here are the results:

I am using this:

If bid < oldlo Then
lo = bid
End If
oldlo = lo

If ask oldhi Then
hi = ask
End If
oldhi = hi


I thought this would capture and latch the highest Hi value and lowest
low of the stream and increment each time a new hi was or lo was
reached.

Instead of latching it, it enters the data request string,
<=edemo|tik!id558?ask into the cell and it does not latch the data as
I expected it should, it enters the ask string rather than a value... I
dont think it is possible to latch anything in the spreadsheet and to
the best of my knowledge vb is the only way to accomplish this.

I am very lost on how to handle data in this manner.

Does anyone have an idea how I can get streaming data to latch and
paint an output to a cell that can be further operated on once in
excel?

a snipped version of the code is below...

Dim bid As String
Dim ask As String
Dim hi As String
Dim lo As String
Dim oldhi As String
Dim oldlo As String

bid = server & topic & id & "bid"
ask = server & topic & id & "ask"

'HOD and LOD
If bid < oldlo Then
lo = bid
End If
oldlo = lo

If ask oldhi Then
hi = ask
End If
oldhi = hi

ActiveCell.offset(0, 2).Value = bid
ActiveCell.offset(0, 3).Value = ask
ActiveCell.offset(0, 7).Value = hi
ActiveCell.offset(0, 8).Value = lo




Here is another update:

tried this and here are the results:

cell p8 is <=edemo13|tik!id0?bid
cell p9 is <=edemo13|tik!id0?ask

in excel in cell 21 i entered <=p8 the cell for the bid and same with
the ask where cell 22 <=q8

then I told vb to get the values and rewrite them into cells 23 and 24
respectively just to see if it would work and I get a type mismatch
error...

bid1 = ActiveCell.offset(0, 21).Value
ask1 = ActiveCell.offset(0, 22).Value
ActiveCell.offset(0, 23).Value = bid1
ActiveCell.offset(0, 24).Value = ask1

Everything I try doesnt work...


--
rnrss
------------------------------------------------------------------------
rnrss's Profile: http://www.excelforum.com/member.php...o&userid=27823
View this thread: http://www.excelforum.com/showthread...hreadid=475688