Date stamp using command button

Hi All

Hope someone can help.
I want to create a command button on one worksheet so that when I click it a pop up box asks the user for the date and this date is input automatically into a specified cell on another worksheet.

I have got this far - which makes my data input box pop up but now I need help adding in code to put that data in a certain cell - for example Cell B1 in worksheet Daily Tasks.

Private Sub CommandButton12_Click()

Dim ans As String
ans = InputBox("Enter date dd/mm/yy", "Data Entry")

End Sub

Please use Code tags between code. Click the # icon to insert them.

Please Login or Register  to view this content.

Hi

Sorry about that - very new to this site and the rules.
I used your line of code but receive an error

Run time error 1004 Method 'Range' of object'_Worksheet' failed

Most likely, your activework does not have a worksheet named "Daily Tasks". Another cause for error can be if a cell is protected. That can be fixed by one of several worksheet protect methods.