Adding 7 Hours to a Time Stamp using VBA

[XCaliber]

There's a formula I found that describes what I want to do:

If I want to Time Stamp a Cell this is the formula I use:
ActiveCell.FormulaR1C1 = Time

Works great !

But If I want to Add 7 Hours to this time stamp why won't this work?

ActiveCell.FormulaR1C1 = Time + Time(7, 0, 0)

What will work instead?

 

[jonathann3891]

Try this:

ActiveCell.FormulaR1C1 = Time + TimeSerial(7, 0, 0)

 

[Joe4]

Another way:

ActiveCell.FormulaR1C1 = Time + (7 / 24)

 

[XCaliber]

Both Solutions worked !! Thank you. jonathann3891 and Joe4