1

セルの範囲を 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

しかし、使用する正しい文字列が見つかりません

4

3 に答える 3

2

あなたも使うことができます

With Selection
   .Value = "'"
   .ClearFormats
End With
于 2013-06-19T16:11:06.947 に答える