Vba - выделение текста

[F19]

Вопрос такой.
Нужно для Word'а написать макрос, применяющий некоторое оформление к выделенному тексту или создающий заготовку, если текст не выделен. Как определить, когда в документе есть выделение текста, а когда его нет?
Подскажите, plz, если кто в курсе.

 

[????]

Для: F19
<!--QuoteBegin-F19+12:06:2005, 17:34 -->
<span class="vbquote">(F19 @ 12:06:2005, 17:34 )</span><!--QuoteEBegin-->Как определить, когда в документе есть выделение текста, а когда его нет?

[snapback]21014" rel="nofollow" target="_blank[/snapback]​

[/quote]

If Selection.Type = wdSelectionIP Then

и дальше своё действие.

 

[_dimka_]

Встречный вопрос: как написать макрос?

я тут не очень силён, больше в Delphi, sql