I am trying to get an "exact" formula to work out the weeks and days between two date i.e.

Cell Ref A1 = 05/06/11 (today's date)
Cell Ref G5 = 30/06/11 (revised delivery date)

I have used formula below but it is not giving the correct information, it is making it 1 week extra

=INT((B1+1-G4)/7)&"week(s),"&MOD(B1+1-G4,7)&"day(s)"

i.e. 4 weeks 2 days when in fact it should be 3 weeks days

Any help with this would be gratefully received