Excel:ClearContent保留公式

Lor*_*nzo 9 excel vba excel-vba

在Excel中,有没有一种方法可以安全地使用Range("A1:B2").ClearContent而不删除单元格中现有的公式?

只是为了让我的场景更清晰:我从数据库中提取新数据,只想删除工作表上的所有内容而不是公式,因为这些将使用vlookup解析其他字段中的某些数据.

Dic*_*ika 16

使用SpecialCells属性仅获取常量值.

Sub RemoveConstants()

    Dim rConstants As Range

    Set rConstants = Sheet1.Range("A1:B2").SpecialCells(xlCellTypeConstants)
    rConstants.ClearContents

End Sub
Run Code Online (Sandbox Code Playgroud)

  • 在sub的开头添加一个`On Error Resume Next`,以避免"找不到单元格"错误. (3认同)
  • 请注意,如果范围中没有单元格实际具有值,则Excel会在响应Set rConstants = Sheet1.Range("A1:B2")时抛出错误"找不到单元格".NellCells(xlCellTypeConstants) (2认同)