Macro w shortcut key to paste date 28 days from today into active cell

[Zooka]

I have been struggling, to figure this out but need to call in the experts.

I would like users to be able to use a shorcut key "control + m" and have it paste the date 28 days from now. This formula works for regular (non-macro use) =TODAY()+28

The idea is to put a DUE date in the cell that will be formatted "dd/mm". The cells where the macro will be executed are already properly date formatted, so I would like to preserve formatting and copy value only.

Any help would be appreciated.

Thanks

[MarvinP]

Hi Zooka,

See if this does it for you.

[Zooka]

Thanks, Marvin

So simple-works like a charm, and I learned something.

Zooka (I added to your reputation)

[MarvinP]

Thanks for the rep, BUT better yet is you learned something!!

[Zooka]

Is there a way to modify this code such that macro will provide date 28 days from today but avoid a weekend result?
-If new date(28 days out) is a Saturday then subtract 1 day to display Friday date
-If new date(28 days out) is a Sunday then add 1 day to display Monday date

I would appreciate it if you are able to assist with this.

[Zooka]

Forgot to change back to [UNSOLVED]

[Sbarro79]

Try something like this:

Please Login or Register  to view this content.

Hope you'll find it helpful

[Zooka]

Hi Sbarro79

Thank you for trying to help with this.

I inputted the code into my macro and got a debugger error at the first "If Weekday" saying argument is not optional.

[Sbarro79]

Sorry to hear that it didn't work.
I tested the code on my computer before posting and it worked so I don't know why this error occurred. Maybe it's just because of different Excel version (but it's rather unlikely).
Meanwhile try to change this line:

Please Login or Register  to view this content.

to this:

Please Login or Register  to view this content.

and see if this works.

[Zooka]

Thanks Sbarro79!

I went to make the change that you suggested and found an extra = sign in the code that I had earlier inputted, and lo and behold, your original suggestion worked just fine! I apologize for any inconvenience, and am thankful for your help!

[Sbarro79]

Oh well, mistakes just happens
Good to know I was helpful.
Please mark the thread as Solved if it's not a problem.