input date column A, increment B, select blank cell in D and input time. in a macro

Hi,

I've been trying to get a macro triggered by a button to select the next blank cell in column A and enter the current date, Static so it doesn't change when I close the spreadsheet.
Then Select column B and increment the number from the above cell
Then Select the next blank cell in column D and enter the current Time.

So Far I can get it to either enter the date in the next blank column A or enter both in column D in separate cells.

unless I do the code like this

Please Login or Register  to view this content.

But I don't know where to start in getting the B column to increment a number.

If I,

Please Login or Register  to view this content.

It selects column D and inputs the Date moves down a cell and inputs the time.

Any help on how to do this an increment the number in Column B would be greatly appreciated.

jeffstu,

Welcome to the forum!
Give this a try, adjust the numberformats to desired:

Please Login or Register  to view this content.

You're very welcome