| Вопрос: Кол-во строк в Word-е | Добавлено: 29.05.07 09:00 |
Автор вопроса:  Vladimir | ICQ: 319511885 |
|
Люди, помогите пожалуйста.
Мне нужно знать сколько строк у меня в выделеном тексте, да и во всём документе. Предложений, символов, абзацев - эт легко узнать, а вот строк, что-то рылся, рылся, ничего не нашёл... |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  GSerg Вопросов: 0 Ответов: 1876 
|
Профиль | | #1 | Добавлено: 29.05.07 10:26 |
|
Ну значит так рылся.
document.ComputeStatistics(wdStatisticLines) |
||
|
Номер ответа: 2 Автор ответа: Pavel Вопросов: 0 Ответов: 82 |
Профиль | | #2 | Добавлено: 29.05.07 16:09 |
|
Может кому-то будет интересно
Sub Макрос1()
Dim i& i = ActiveDocument.ComputeStatistics(wdStatisticCharacters) MsgBox "Количество символов без пробелов: " & i i = ActiveDocument.ComputeStatistics(wdStatisticCharactersWithSpaces) MsgBox "Количество символов с пробелами: " & i i = ActiveDocument.ComputeStatistics(wdStatisticLines) MsgBox "Количество строк в документе: " & i i = ActiveDocument.ComputeStatistics(wdStatisticPages) MsgBox "Количество страниц в документе: " & i i = ActiveDocument.ComputeStatistics(wdStatisticParagraphs) MsgBox "Количество параграфов: " & i i = ActiveDocument.ComputeStatistics(wdStatisticWords) MsgBox "Количество слов в документе: " & i End Sub |
||
Страница: 1 |