Date in an Inputbox transferred to the specific cell of a worksheet

Hi experts and gurus,

I am at the end of the automated Report. I am looking to set up an input box that seeks the "Current Report Date" and "Last Report Date", which are then transferred to cells B1 and B2 of a worksheet respectively. The date will be in a specific format "DD/MM/YYYY".

If the date is in invalid format, the message box will be prompted with "invalid date format".

I have tried to write the following code which needs improvement to get the result.

Please Login or Register  to view this content.

Can somebody help me to write a code to put a date that is transferred to B1 and B2?

Thank you so much to all the experts and gurus to help me learn VBA.

Roshan Shakya

Format the two cells to the format you like

Please Login or Register  to view this content.