This is an age old query, I received help some months back on calculating the difference between two dates. There remains one problem:

What I have at the moment:

I have a cell called CURRENT and one called TARGET.

Current has todays date and target has 29/07/05.

I have a cell called TO GO which has the formula = Target - Current

The cell is formated in the following: yy mm dd hh:mm:ss

There is VBA which updates NOW so that I have a countdown.

(Dim SchedRecalc As Date

All this works fine.

The Problem:

The result in the cell TO GO is not accurate. It does not show the exact number of days to go. For example if Current = 29/07/04 and Target = 29/07/05 I want to see TO GO showing that there are 12 Months and 0 days to go.

Any ideas why the DAY part is not giving the answer I am expecting?

MZP

What I have at the moment:

I have a cell called CURRENT and one called TARGET.

Current has todays date and target has 29/07/05.

I have a cell called TO GO which has the formula = Target - Current

The cell is formated in the following: yy mm dd hh:mm:ss

There is VBA which updates NOW so that I have a countdown.

(Dim SchedRecalc As Date

Code:

Sub SetTime() SchedRecalc = Now + TimeValue("00:00:01") Application.OnTime SchedRecalc, "Recalc" End Sub Sub Recalc() Range("Current").Value = Now Call SetTime End Sub Sub Disable() On Error Resume Next Application.OnTime EarliestTime:=SchedRecalc, Procedure:="Recalc", Schedule:=False End Sub)

The Problem:

The result in the cell TO GO is not accurate. It does not show the exact number of days to go. For example if Current = 29/07/04 and Target = 29/07/05 I want to see TO GO showing that there are 12 Months and 0 days to go.

Any ideas why the DAY part is not giving the answer I am expecting?

MZP

## Comment