Input box

[Greg B]

How do I get this to place information onto a work sheet called committee
cell b10?

Private Sub CommandButton9_Click()
Dim MyInput
MyInput = InputBox("Enter your name")
MsgBox MyInput

End Sub


Thanks
Greg

 

[Paul B]

Greg, here is one way,
Sheets("committee").Range("B10") = InputBox("Enter your name")


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

 

[Greg B]

OK Thanks for your help

Greg

Greg, here is one way,
Sheets("committee").Range("B10") = InputBox("Enter your name")


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

 

[Bob Phillips]

Worksheets("committee").Range("B10").Value = MyInput

--

HTH

RP
(remove nothere from the email address if mailing direct)

 

[Greg B]

Thanks to both of you for the help

Greg

Worksheets("committee").Range("B10").Value = MyInput

--

HTH

RP
(remove nothere from the email address if mailing direct)