Форум по VBA и MS Office

Добрый день!
Подскажите пожалуйста, а какой командой можно проверить, что курсор находится в зоне, где находится текст сносок (концевых или страничных)?

Sub Макрос()

    Select Case Selection.StoryType
        Case wdFootnotesStory
            MsgBox "Курсор в страничных сносках.", vbInformation
        Case wdEndnotesStory
            MsgBox "Курсор в концевых сносках.", vbInformation
        Case wdMainTextStory
            MsgBox "Курсор находится в тексте файла.", vbInformation
    End Select

End Sub

Выручили снова! Огромное спасибо!