Dim rng as Range
set rng = Range(Range("A2"),Range("A2").End(xldown))
rng.offset(0,3).Formula = "=C2-Time(1,0,0)"
Regards,
Tom Ogilvy
Quote:
> Hi Appreciate any help on this.
> I still have'nt come to grips with entering formula in an offset column
> (1) column a is the column to use to decide where the data ends
> (2) Column d is the offset column where the formula go into starting at
row2
> The formula is
> =c2-time(1,0,0)
> Thanks in advance
> Graham