Adding a drop down menu

[jon13]

Hi All

I am using JimmyTheHands recommendation vbaexpress.com/forum/showpost.php?p=152307&postcount=6. (unable to post links hence the broken up link)
I would like to add a drop down menue for one of the inputs and on the date input I would like to reject any future dates as error message.
I have very little programming experience so any help will be greatly appreciated.

Code to prompt the user for data;

Sub test()
Dim InputValue As Variant
InputValue = InputBox("enter date")
Range("A1") = InputValue
InputValue = InputBox("Select Account")
Range("A2") = InputValue
InputValue = InputBox("Enter Amount")
Range("A3") = InputValue
InputValue = InputBox("Enter Tax Amount")
Range("A4") = InputValue

End Sub

Thank you for your help!

Jon