Mega Code Archive
To retrieve input from an input box, declare the numeric variable or String variable that will contain it
<![CDATA[
Sub help()
Dim strWhichOffice
strWhichOffice = _
InputBox("Enter the name of the office:", _
"Expense Assistant 2000", "default", , , _
"c:\Help.chm", 0)
End Sub
]]>