Sub For_eachの使い方①_セルの範囲()

    For Each セル In Range("A1:B3") '指定範囲を一個づつ巡回する
    
        If セル = "" Then '空白の場合
        
            MsgBox セル.Address & "が空白です" 'メッセージを出す
            
            End
            
        End If
    
    Next セル

End Sub