Гы-ы... cells.Count вызывает Overflow!  
В данном случае можно  
 
If Target.Address <> "$C$5" And Target.Address <> "$C$6" Then Exit Sub

Ошибка, и способы её обхода, описаны в интернете  
(рекомендуют использовать свойство Cells.CountLarge)  
 
Excel 2007 and higher can have soo many cells on a sheet that the Cells.Count property overflows.    
Use the Cells.CountLarge property instead.    
It returns a variant with the number of cells.

да просто on error поставить..

да, но.. :)  
 
 
countlarge нарушит совместимость с прежними версиями.., а on error будет работать и там и там.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)  
   If Target.Cells.Count > 1 Then Exit Sub  
   If Intersect(Target, Range("C5:C6")) Is Nothing Then Exit Sub  
   MsgBox "Ура !"  
End Sub

{quote}{login=}{date=05.05.2011 11:55}{thema=}{post}Private Sub Worksheet_SelectionChange(ByVal Target As Range)  
   If Target.Cells.Count > 1 Then Exit Sub  
   If Intersect(Target, Range("C5:C6")) Is Nothing Then Exit Sub  
   MsgBox "Ура !"  
End Sub{/post}{/quote}  
 
эт вы, батенька, фигню какую-то написали :)