求大神看看为什么代码运行后无法得到相应的结果

一亦

小白自学《别怕，EXCEL VBA其实很简单  第2版》
其中5.2.6-用特殊格式标注与选中单元格内容一致的所有单元格，比如选中C3单元格，那区域内所有与C3单元格内容一致的单元格底纹变为黄色
按书上的代码做了，但正常运行后无法得到对应的结果，看代码看不出来问题，请大神看看是什么问题，谢谢
代码：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      Range("C3:N17").Interior.ColorIndex = xlNone              '清除保存姓名的单元格的底纹颜色
      If Application.Intersect(Target, Range("C3:N17")) Is Nothing Then
      MsgBox "没有选中指定区域"
      Exit Sub                                                                       '如果改变的单元格不是指定区域的单元格时，退出程序
            If Target.Count > 1 Then
            Set Target = Target.Cells(1)
            Dim rng As Range
            For Each rng In Range("C3:N17")
                  If rng.Value = Target.Value Then
                  rng.Interior.ColorIndex = 6
                  End If
            Next rng
            End If
      End If
End Sub

一亦

已经自己解决了，Target.Count > 1改成Target.Count >= 1

一亦

已经自己解决了， If Target.Count > 1改成If Target.Count >= 1