在多页工作簿的“设置”页上删除多个单元格时，VBA错误13

Question

多页工作簿，在“设置”工作表上显示隐藏工作表时，在单元格中放置了一个值（范围为F4：F23）。问题是，当您删除该范围内多个单元格的内容时，页面不会隐藏，并且会收到“运行时错误'13'：类型不匹配

尝试Target.Range 如果没有尝试过

        Private Sub Worksheet_Change(ByVal Target As Range)

  If Target.Column = F And Len(Target.Value) > 0 Then

        If Evaluate("Countif(F:F," & Target.Address & ")") > 1 Then
            MsgBox Target.Value & " is a duplicate entry.", vbExclamation, "Duplicate Entry"
            Range(Target.Address).ClearContents

        End If

         End If

然后继续显示或隐藏代码，并根据输入的值命名工作表。 （哪个效果很好）

一次选择并删除1个单元格的内容将隐藏工作表，并且不会返回错误，删除多个单元格的内容将返回错误，并且不会隐藏其他工作表并删除名称。我已经创建了一个宏来清除设置表，但是不能使用它！ 我需要能够一次清除多个单元格的内容。