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.
|