Thread: Todays date plus 3 months & less 3 months
View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Jim Jackson Jim Jackson is offline
external usenet poster
  
Posts: 324
Default Todays date plus 3 months & less 3 months
This will give an exact 3 month period.

IntervalType = "m"
Number = 3

ActiveSheet.Range("E17") = _
DateAdd(IntervalType, Number + 3, Range("E10"))
ActiveSheet.Range("E18") = _
DateAdd(IntervalType, Number - 3, Range("E10"))

--
Best wishes,

Jim


"Les Stout" wrote:

Hi, i can get todays date but need to add 3 months to it and the other
way too.

Any help would be much appreciated.

Les Stout

*** Sent via Developersdex http://www.developersdex.com ***

Reply With QuoteReply With Quote