0

すべての空のセルを選択する VBA マクロを作成しています。それは機能しますが、一部のセルが空であっても、Excel はそれらをダブルクリックするまで空ではありません。

これがなぜなのか誰か知っていますか?

4

1 に答える 1

2

これらのセルは、長さゼロの文字列を持つセルです。
それらを評価できるようにするには、Len関数を使用してみてください。

例:

Sub test()

Dim cel, rng As Range, NoVal As Boolean, rngselection As String, i As Long

Set rng = ThisWorkbook.Sheets(1).Range("A1:A5")

rngselection = ""
i = 1
For Each cel In rng
    NoVal = IIf(Len(cel.Value) = 0, True, False)
    If NoVal Then
        If i > 1 Then
            rngselection = rngselection & "," & cel.Address
        Else
            rngselection = cel.Address
        End If
        i = i + 1
    End If
Next cel
Range(rngselection).Select

End Sub

これにより、 のすべての空のセルが選択されRange("A1:A5")ます。
上記のコードはテスト済みであり、デモンストレーションのみを目的としています。

于 2013-11-15T08:20:09.340 に答える