Excel 宏以清除列中包括格式在内的内容

我想清除G列中的内容，包括格式，直到列中的最后一个数据。注：G列之间也有一些空单元格。我使用了下面的代码，它工作正常，但它清除了所有列中的数据。如果您有任何帮助，我们将不胜感激

Sub ClearData()
Range("A3", Columns("A").SpecialCells(xlCellTypeLastCell)).Clear
MsgBox ("Data Cleared")
End Sub

---

谢谢

下面的代码将

ClearContents

和

ClearFormats

从“G”列开始（从“G3”开始，直到最后一行，数据在“G”列）

---

下面的代码将

ClearContents

和

ClearFormats

从“G”列开始（从“G3”开始，直到最后一行，数据在“G”列）

你的帖子写的是“G”列，但是你的代码有“A”列，那么你想要哪一列？你的帖子写的是“G”列，但是你的代码有“A”列，那么你想要哪一列？

Sub ClearData()

With Range("G3:G" & Cells(Rows.Count, "G").End(xlUp).Row)
    .ClearContents
    .ClearFormats
End With
MsgBox "Data Cleared"

End Sub