やりたいことはタイトルの通りです。
コードと問題点は以下の通りです。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'複数選択したセルを着色
'下記2行を有効にすると、下記2行含む、以下全てのコードが機能しなくなります。
'下記2行を無効にすると、複数選択したセルの脱色が有効になり、クリックしたセルも着色されます。
If Target.Count <= 1 Then Exit Sub
Target.Interior.ColorIndex = xlNone
'「Row」と入力しても、なぜか自動で「row」になります
'その上、指定した通りの範囲条件が適用されません
If Target.row >= 11 And Target.Column >= 6 Then Exit Sub
Select Case Target.Interior.ColorIndex 'クリックしたセルの色が
Case Is = xlNone '無色の場合は
Target.Interior.ColorIndex = 3 '「3」赤色に着色
Case Else 'それ以外の色の場合は
Target.Interior.ColorIndex = xlNone '無色にする
End Select
End Sub
以上、どなたか問題点をご教示いただけないでしょうか。