View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.misc
[email protected] Qull666@hotmail.com is offline
external usenet poster
 
Posts: 114
Default Script doesn't work when cells are merged.

Thanks for the help in advance!!!!

Looking at the script below, when cell A1 is merged with another cell, the
script doesn't work.

How do i make it work, (irregardless wether its merge or not)

Private Sub Worksheet_Change(ByVal Target As Excel.Range)

If Target.Cells.Count 1 Then Exit Sub
If Len(Target.Value) 0 Then Exit Sub

Application.EnableEvents = False

If Target.Address = "$A$1" Then Target.Value = "This is merged cell (A1
merge to C3."

If Target.Address = "$B$1" Then Target.Value = "This is single cell"

Application.EnableEvents = True
End Sub

Thanks.