Форум по VBA и MS Office

У меня есть макрос. Перед запуском макроса пользователь выделяет фрагмент.
Нужно добавить проверку: если в выделенном фрагменте первая ячейка пустая, то выдать сообщение и остановить макрос.

Sub Макрос()

    If Selection.Cells(1, 1).Value = "" Then
        MsgBox "В выделенном фрагменте первая ячейка не должна быть пустой.", vbExclamation
        Exit Sub
    End If

End Sub

Спасибо.