Question

我需要用Null填充一系列单元格。我目前正在使用：

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

但我找不到正确使用的字符串

Answer 1

这样做：

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

将选择中的每个单元格设置为空白字符串;正如你在评论中所说的那样。

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

Answer 2

您也可以使用

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

Answer 3

试试这个：

Sub WhatIWouldLike()
    Selection.ClearContents 
End Sub

用Null填充范围

3 个答案: