show and hide a text box
 

i need some script that will make a text box appear when A1 is selected then
dissappear when it is deselected. the default status of the text box needs to
be hidden. is this possible and if so how?


many thanks

chris

show and hide a text box
 

Chris,

Assuming you are using the text box from the Controls command bar, put the
following code in the worksheet code module for the sheet than contains the
text box.


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Me.TextBox1.Visible = _
Not (Application.Intersect(Range("A1"), Target) Is Nothing)
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting
www.cpearson.com
(email on the web site)


"Christopher Buxton" wrote in
message ...
i need some script that will make a text box appear when A1 is selected
then
dissappear when it is deselected. the default status of the text box needs
to
be hidden. is this possible and if so how?


many thanks

chris