Macro to add so many days if a cell equals todays date

[rjm87]

If cell a1 equals todays date add cell b2s value to it and put the new date back into cell a1.

[nathansav]

if range("a1").value=date() then range("a1").value =dateadd("d",range("b1").value,range("a1").value)

Please would have been nice

[rjm87]

Thanks nathansav ,sorry my heads all over the place . I am grateful for your help , is there any way to continue it example if a2 equals todays date add b2 and put into a2,

Many thanks
RJM

[nathansav]

if range("a1").value=date() then range("a2").value =dateadd("d",range("b2").value,range("a1").value)

[rjm87]

Sorry Im not very good at explaining things, I would like it to basically do it for rows 1 to 20, If the date in colum a = todays date add whats in that row for colum b and put answer into colum .

Many Thanks
RJM

[rjm87]

Please Login or Register  to view this content.

Changed the code to the above and working , Thanks for all your help nathansav your a star

[JOHN H. DAVIS]

Maybe:

Please Login or Register  to view this content.