Форум программистов
Реклама:
Интернет Контроль Сервер: российский межсетевой экран.
Контроль трафика, контент-фильтр, почта, антивирус, VPN, прокси-, веб- и jabber-сервер. Сертификат ФСТЭК
Регистрация  |  Повторная активизация e-mail  |  Правила форума  |  Исходники Delphi  |  Основы Delphi  |  Новости клуба  |  alarforum@yandex.ru

Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам!


Вернуться   Форум программистов > Microsoft Office и VBA > Microsoft Office Word



Ответ
 
Опции темы
Старый 03.03.2011, 04:31   #1
Рыжик чик чик
Пользователь
 
Регистрация: 25.05.2010
Сообщений: 10
Репутация: 15
Вопрос Количество слов в абзаце

Подскажите пожалуйста как с помощью VBA посчитать количество слов в абзаце текста
Рыжик чик чик вне форума   Ответить с цитированием
Старый 03.03.2011, 10:19   #2
Ципихович Эндрю
Профессионал
 
Регистрация: 24.01.2011
Сообщений: 1,836
Репутация: 21
По умолчанию

Код:

Количество_слов_в_абзаце = ActiveDocument.Paragraphs(5).Range.Words.Count
Количество_предложений_в_абзаце = ActiveDocument.Paragraphs(5).Range.Sentences.Count

Ципихович Эндрю вне форума   Ответить с цитированием
Старый 03.03.2011, 13:29   #3
Рыжик чик чик
Пользователь
 
Регистрация: 25.05.2010
Сообщений: 10
Репутация: 15
По умолчанию

Спасибо большое))
Рыжик чик чик вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Количество слов в строке Настя93 Помощь студентам 7 24.02.2011 19:47
Количество слов romanzi Общие вопросы Delphi 1 19.02.2011 22:43
Подсчитать количество слов и количество букв MDSIQ Assembler 1 13.11.2010 16:57
Дана строка, состоящая из нескольких слов. Найти количество слов, которые содержат хотя бы одну букву "А" Mashaa Помощь студентам 13 09.12.2009 13:28
Составить в алфавитном порядке список всех слов, встречающихся в тексте, и количество этих слов. KAPAHDAW Паскаль 2 17.02.2009 01:19




02:37.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2016, Jelsoft Enterprises Ltd.

Пеллетные котлы Emtas


Emtas.net продажа и монтаж отопительного оборудования
Корпусная мебель оптом и под дизайн проект


Для Москвы цены низкие, а качество высокое.
RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru