您好我有一张excel表,其中包含从A列到FQ的大量数据。列GA到GQ具有标题并在其下方具有公式以从初始列中提取相关信息。我的要求是清除表格中的数据,保持标题和公式不变,请注意,这些数据不会存储为表格,而是正常范围。
答案 0 :(得分:-2)
以下内容如何:
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