用空值填充范围

我需要用空值来填充一系列单元格。 我目前使用：

Sub FillARangeWithNulls() Dim DQ As String DQ = Chr(34) With Selection .Clear .Formula = "=" & DQ & DQ .Copy .PasteSpecial Paste:=xlPasteValues End With End Sub 

这个代码有效，但是对于这个简单的任务似乎有点复杂。 我希望有这样的东西：

 Sub WhatIWouldLike() Selection.Value = ??????????????? End Sub 

但我无法find正确的string使用

Answer 1

做这个：

 Sub WhatIWouldLike() Selection.Value = "" End Sub 

将选中的每个单元格设置为空string; 正如你所说你想在你的评论。

但请注意，这与未触及的单元格不同。 为此，请使用ClearContents作为@mehow或@Cody Piersall状态。

Answer 2

你也可以使用

 With Selection .Value = "'" .ClearFormats End With 

Answer 3

尝试这个：

 Sub WhatIWouldLike() Selection.ClearContents End Sub