用於單個消息框的Excel VBA用於所有空單元格

Question

我試圖返回範圍爲D8:D13的空單元格的所有單元格的地址。
我想顯示一個消息框，列出所有返回的地址，如果有的話。

例如：

我想一個消息框，說像「D9，D10，D11和D13是空的。」

Answer 1

你的意思是像下面的代碼：

Option Explicit 

Sub GetEmptCells() 

Dim C As Range 
Dim MsgStr As String 

For Each C In Range("D8:D13") ' <-- change the range in this line 
    If C.Value2 = "" Then 
     If MsgStr = "" Then 
      MsgStr = C.Address(False, False) 
     Else 
      MsgStr = MsgStr & "," & C.Address(False, False) 
     End If 
    End If 
Next C 

MsgBox MsgStr & " cells are empty" 

End Sub