Excel 清除范围的内容，包括已过滤的数据VBA

我正在使用以下语句删除某个范围内单元格的内容，但它无法删除已筛选单元格的内容：

wbMM.Sheets("SS 18 MESES").Range("A:A").Clear

知道怎么修吗

---

谢谢，

这将具有与清除单元格相同的效果：

Sub KillA()
        Columns("A:A").Select
        Selection.Delete Shift:=xlToLeft
        Selection.Insert Shift:=xlToRight
End Sub

---

您将得到一个空列A

您能先删除筛选吗

With wbMM.Sheets("SS 18 MESES")
    If .FilterMode Then
        .ShowAllData
    End If

    .Range("A:A").Clear
End With

不要使用

“A:A”

设置您的

范围

，

自动筛选

，然后循环遍历范围内的每个单元格并清除

Dim rng As Range: Set rng = ThisWorkbook.Sheets("Sheet1").Range("A2", Range("A" & Rows.Count).End(xlUp))

    With rng
        .AutoFilter 1, "x"

        For Each cel In rng
            cel.Clear
        Next cel
    End With

---

取消筛选然后清除不可选项？@BigBen不在本例中。@BigBen重复完全相同的行？@BigBen它不起作用，已筛选单元格的内容未清除：是的，您必须使用建议的答案-抱歉，忽略我的评论。我在其他表格中有公式，取决于该范围内单元格的值，所以这不起作用，因为我回答了另一个建议这个想法的评论，在这种情况下，这不是一个选项