drop down list or option button as like a message box with vba code

[Lauren279]

I am after a code to create a msg box to ask a series of question and the user needs to select an option, based on that question, and what they have selected for that question will show up in cell B5</SPAN>

For example </SPAN>
question 1 (how was your day?) </SPAN>
option 1 (good) </SPAN>
option 2 (bad) </SPAN>
option 3 (extremely busy) </SPAN>
option 4 (long), </SPAN>
and if they select option 1 the word (good) will show up in cell B5, </SPAN>
I only want the question to pop up if in cell B4 equals and certain set of text </SPAN>
for example</SPAN>
If B4 = “AA” it will ask “how was your day?” and up to 5 options</SPAN>
If B4 = “BB” it will ask “how many people working? And they need to input a number in a text box</SPAN>
If B4 = “CC” it will ask “description of what the people look like” and they need to input a string of text in a text box</SPAN>
After they do this the text, number or option will be placed in cell B5 and then after this is all done it will ask would you like to print and then it will run a print macro (which I already have)</SPAN>
I have the start of a macro of target value as A2 and that is a reference number but after this is entered based on what is in Cell B4 it needs to ask the series of question and if what is in B4 doesn’t match the above question option it will run the print macro </SPAN>
So the steps are:</SPAN>
Enter a reference number in A2 </SPAN>
Checks the value in B4 and if B4 = “aa”, ”bb”, ”cc” run individual question for each, and then run the print macro </SPAN>
If B4 equals anything other then “aa”, ”bb”, ”cc” then run a print macro</SPAN>
I mainly need the Option button or enter text string in box in a vba code, I pretty much have everything else</SPAN></SPAN>