如何使用 vba 清除整个工作表？

要使用 VBA 代码一次性清除整个工作表，您需要使用两件事，第一个是 CLEAR 方法，然后是 CELLS 来引用工作表中的所有单元格。

清除活动工作表

假设您想清除激活表的所有内容，代码如下。

 Cells.Clear

当您运行此代码时，它将清除活动工作表中所有单元格中的所有内容，正如我已经提到的，我们使用clear来引用整个工作表，并使用clear来清除它。

清除特定工作表

您应该注意一件事，要清除工作表，必须启用该工作表。假设您想清除“Sheet1”，代码如下：

 Sheets("Sheet1").Activate Cells.Clear

在此代码中，第一行激活“Sheet1”，第二行清除所有内容。

其他需要清除的事情

您还可以使用以下方法来擦除不同的内容。

 Cells.ClearContents 'to clear contents Cells.ClearComments 'to clear Comments Cells.ClearFormats 'to clears formatting Cells.ClearHyperlinks 'to clear hyperlinks Cells.ClearNotes 'to clear notes Cells.ClearOutline 'to clears outline

从特定工作簿中删除工作表

下面的代码可以引用工作簿“Book1”并清除工作表“Sheet1”。但请确保运行此代码时工作簿处于打开状态。

 Workbooks("Book1").Sheets("Sheet1").Activate Cells.Clear

该代码首先激活书本的“Sheet1”并将其删除。

从关闭的工作簿中删除工作表

在下面的代码中，我们引用了工作簿“sample-file”的“Sheet1”，存储在特定位置。

 Sub vba_clear_sheet() Dim wb As Workbook Application.ScreenUpdating = False Set wb = Workbooks.Open("C:\Users\Dell\Desktop\sample-file.xlsx") wb.Sheets("Sheet1").Activate Cells.Clear wb.Close SaveChanges:=True Application.ScreenUpdating = False End Sub