VBA "negative" time

[nerobot]

Hi,

I'm trying to write something into excel VBA that will close all bets when the time (the time before the market begins, as shown on BA) gets to zero. To do this I've created a double value to store the time. This works fine while the time shown is positive, but when the time is negative, the program crashes.

My question is: How can I represent negative time in VBA that will allow me to perform simple calculations and comparisons.

Regards,

Steven

[GaryRussell]

Here is some code from a sample spreadsheet that does this calculation. timeFromStart is of type "Date"

Code: Select all

        If Left([D2], 1) = "-" Then
            timeFromStart = Mid([D2], 2)
            beforeStart = False
        Else
            timeFromStart = [D2]
            beforeStart = True
        End If
        secondsFromStart = (Hour(timeFromStart) * 3600) + (Minute(timeFromStart) * 60) + Second(timeFromStart)
        If Not beforeStart Then secondsFromStart = -secondsFromStart


[nerobot]

Once again thank you. Exactly what I was looking for.

Regards,

Steven