Статьи из блога

Статьи из блога

Как определить номер параграфа, в котором найден фрагмент текста

Рубрика: Вопрос-Ответ, Макросы
Метки: | |
Четверг, 25 декабря 2008 г.
Просмотров: 6412
Подписаться на комментарии по RSS
Версия для печати

[Ссылки на статью]

Анатолий задал вопрос:


Как определить номер (pos) параграфа (Paragraphs), в котором найден нужный фрагмент, с тем, чтобы я смог его в дальнейшем использовать?


Например, можно определить текущую позицию курсора в сантиметрах с помощью следующего макроса:



Option ExplicitSub 
HorPos()
'Определение позиции курсора по горизонтали в сантиметрах
Dim Location As Double
Location = Selection.Information(wdHorizontalPositionRelativeToTextBoundary)
MsgBox PointsToCentimeters(Location)
End Sub



Если нужно определить номер параграфа, то это можно сделать так:

Sub numPar()
'Определяем номер текушего абзаца (параграфа), где стоит курсор
Dim sN As Long
sN = ActiveDocument.Range(1, Selection.Start).Paragraphs.Count
MsgBox sN
End Sub
twitter.com facebook.com vkontakte.ru odnoklassniki.ru mail.ru ya.ru rutvit.ru myspace.com technorati.com digg.com friendfeed.com pikabu.ru blogger.com liveinternet.ru livejournal.ru memori.ru google.com bobrdobr.ru mister-wong.ru yahoo.com yandex.ru del.icio.us

Еще записи по вопросам использования Microsoft Word:

Оставьте комментарий!

(обязательно)

^ Наверх