VBA清除纸张保留标题和公式的内容

Question

你好，我有一个Excel表，其中有大量数据从A列到FQ。GA至GQ列有标题，并在其下方具有公式，以从初始列中提取相关信息。我的要求是清除表格中的数据，使标题和公式完好无损，请注意，此数据不是作为表格存储的，而是正常范围。

Answer 1

以下情况如何：

Sub foo()
Dim ws As Worksheet: Set ws = Sheets("Sheet1")
'declare and set your worksheet, amend as required
LastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
'get the last row with data on Column A
    ws.Range("A2:FQ" & LastRow).ClearContents
End Sub