.Value = "" 和 .ClearContents 之间有什么区别？

如果我运行以下代码

Sub Test_1()
   Cells(1, 1).ClearContents
   Cells(2, 1).Value = ""
End Sub

当我使用公式检查 Cells(1, 1) 和 Cells(2, 1) 时ISBLANK()两个结果都返回TRUE。所以我想知道：

有什么区别Cells( , ).Value = "" and Cells( , ).ClearContents?

它们本质上是一样的吗？

如果我然后运行以下代码来测试方法之间的时间差：

Sub Test_2()
Dim i As Long, j As Long
Application.ScreenUpdating = False

For j = 1 To 10
    T0 = Timer
    Call Number_Generator
    For i = 1 To 100000
        If Cells(i, 1).Value / 3 = 1 Then
            Cells(i, 2).ClearContents
           'Cells(i, 2).Value = ""
        End If
    Next i
    Cells(j, 5) = Round(Timer - T0, 2)
Next j

End Sub

Sub Number_Generator()
Dim k As Long
Application.ScreenUpdating = False

For k = 1 To 100000
    Cells(k, 2) = WorksheetFunction.RandBetween(10, 15)
Next k

End Sub

我在我的机器上得到以下运行时输出

.ClearContents  .Value = ""
4.20            4.44
4.25            3.91
4.18            3.86
4.22            3.88
4.22            3.88
4.23            3.89
4.21            3.88
4.19            3.91
4.21            3.89
4.17            3.89

根据这些结果，我们看到该方法.Value = ""比.ClearContents一般。总体来说这是真的吗？为什么这样？

根据我的发现，如果您的目标是简单地拥有一个空单元格并且您不想更改有关格式的任何内容，那么您应该使用 Value = vbNullString 因为这是最有效的。

“ClearContents”正在检查和更改单元格中的其他属性，例如格式和公式（从技术上讲，这是与值不同的属性）。当使用 Value = "" 时，您只更改一个属性，因此速度更快。使用 vbNullString 会提示编译器您正在使用空字符串，而使用双引号的其他方式则需要通用字符串。因为 vbNullString 提示它需要一个空字符串，所以它能够跳过一些步骤，从而获得性能提升。