Multiple Target as Excel Range
I am using Excel 97, I need to use the following behind a worksheet but need
to incl,ude the following blocks of cells in the range.
It works with 2 but debugs on 3.
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
'Sets the range of cells for the code to work if a cell other than the range
is altered
'the sub is exited.
Set Target = Intersect(Target, Range("C11:AD15", "C19:AD23", "C27:P31"))
If Target Is Nothing Then
Exit Sub
End If
Can anyone assist with a solution, please?
Many thanks
--
Mark
|