View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
nickm687 nickm687 is offline
external usenet poster
 
Posts: 20
Default ActiveCell and TextBox

Hi,
I am using the code below to change the contents of a textbox depending
on which cell is highlighted. the code works fine but does not work on
a merged cell. any ideas?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Select Case Target.Address(0,0)
Case "C1"
ActiveSheet.TextBox1.Value = "One"
Case "D3", "F1", "M12"
ActiveSheet.Textbox1.Value = "Two
Case Else
ActiveSheet.TextBox1.Value = ""
end Select
End Sub


Thanks
Nick