Word VBA Макросы. Как узнать, сколько абзацев выделено?

[Посетитель]

Как с помощью макроса узнать, сколько абзацев выделено?

[Администратор]

Sub Macro()

    ' Запись информации в View - Immediate Window.
    Debug.Print Selection.Paragraphs.Count
   
End Sub

[Посетитель]

Большое спасибо!