View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Mark Mark is offline
external usenet poster
 
Posts: 989
Default 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