VBA中指定范围删除单元格内容

在 VBA 中，可以使用 `Range` 对象的 `ClearContents` 方法来删除指定范围内的单元格内容。以下是一个示例代码，它删除名为 `Sheet1` 中 A1:B10 范围内的单元格内容：

Sub ClearRangeContents()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Worksheets("Sheet1")
    ws.Range("A1:B10").ClearContents
End Sub

在上面的代码中，我们首先使用 `ThisWorkbook` 对象获取当前工作簿对象，然后使用 `Worksheets` 集合中的 `Item` 属性获取名为 `Sheet1` 的工作表对象，并将其保存在 `ws` 变量中。然后，我们使用 `Range` 对象获取 A1:B10 范围，并调用 `ClearContents` 方法来删除其内容。

请注意，`ClearContents` 方法只会删除单元格中的内容，而不会删除单元格格式、注释或其他属性。如果需要同时删除这些属性，可以使用 `Clear` 方法。例如，`ws.Range("A1:B10").Clear` 会删除指定范围内的所有内容和格式。