Use the InputBox function in Excel VBA
assign a value to the answer, for example

Sub InputBoxExample()
x = InputBox("How Old Are you?", "Age")
Range("A1").Value = x
End Sub

This procedure displays an input box and then enters the value into
cell A1.
you can pick any cell you like.

somethinglikeant