Increase date by one month to end of month

Trying to write a code for a command button to increase the date on my worksheet by one month and return the end date of the month

I wrote a really basic code;

Please Login or Register  to view this content.

When I increase to February it returns 29/02/2020
Then when I go to March it returns 29/03/2020 and so on

How can I amend it to return the end date of the month?

Administrative Note:

We would very much like to help you with your query, however you need to include code tags around your code.

Please take a moment to add the tags. Posting code between tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Please see Forum Rule #2 about code tags and adjust accordingly. Click on Edit to open your post, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

(Note: this change is not optional. No help to be offered until this moderation request has been fulfilled.)

Thanks.

I know you want code, but the formula for this would be:

=EOMONTH(EDATE(B1,1),0)

I thought that you could tell the code to apply a formula?

Something like this, for example:

Please Login or Register  to view this content.

https://docs.microsoft.com/en-us/off....range.formula

How about this?

Please Login or Register  to view this content.

You no longer need the DateAdd line in your code.