Code: Select all
Range("ddate") = Application.InputBox(prompt:= _
"Enter 2-digit numeric value of the month.", _
Title:="Specify Month")
Code: Select all
Range("ddate") = Application.InputBox(prompt:= _
"Enter 2-digit numeric value of the month.", _
Title:="Specify Month")