Oops. Delete the Dim rSelect As Range line (it was from a different
worksheet_change procedure that I use).

In article ,
JE McGimpsey wrote:


I might amend the macro like this:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim rSelect As Range