Макрос подсчета количества строк в таблице
Если ваш документ содержит таблицу и вам нужно подсчитать количество строк в ней, то результат можно получить двумя способами.
Первый способ заключается в том, что вы выделяете таблицу, открываете диалоговое окно Свойства таблицы и на вкладке Строка узнаете количество строк:
Второй способ заключается в написании простейшего макроса, который подсчитывает количество строк в текущей таблице (в которой находится курсор ввода) и выводит окошко с информацией:
Откройте редактор Visual Basic (Alt+F11) и вставьте в какой-либо модуль шаблона Normal.dot следующий код:
Sub rowsCount() ' Подсчет количества строк в текущей таблице Dim n As Integer n = Selection.Tables(1).Rows.Count MsgBox prompt:="В таблице " & n & " строк", _ Title:="Подсчет строк в таблице" End Sub
Чтобы иметь быстрый доступ к этому макросу, назначьте для него сочетание клавиш или создайте кнопку на панели инструментов или в панели быстрого доступа (Word 2007).
Еще записи по вопросам использования Microsoft Word:
- 3 способа очистки списка недавно открытых документов
- Абзац с цветным фоном
- Автоматическая запись макроса
- Автоматическая расстановка переносов
- Автоматическое обновление полей при открытии документа
- Автоматическое сохранение документа при его закрытии
- Быстрая смена ориентации страниц документа
- Быстрое перемещение между открытыми документами Word
- Быстрое создание нового документа на основе шаблона
- Быстрое удаление границ у таблицы
- Быстрый ввод текста с помощью команды =rand()
- Ввод часто повторяющихся фрагментов текста
- Вставка будущей даты
- Вставка документа с книжной ориентацией в документ с альбомной ориентацией
- Вставка завтрашней даты
- Вставка изображений из указанной папки для Word 2007
- Вставка неформатированного текста
- Вставка скопированного текста в предопределенном формате
- Вставка текста с полями в нижний колонтитул
- Вставка текста с помощью кнопки
- Выделение видимой части экрана
- Двойная нумерация страниц в документе
- Дизайн границ у таблиц в редакторе Word
- Задать обтекание текстом для всех рисунков в документе
- Замена жаргонных слов в тексте
Как узнать сколько строк в таблице ворд
Здравствуйте Уважаемые программисты!
Скажите пожалуйста как поправить код. Ситуация такая:
В документе Word 2003 создана таблица и следующим кодом ниже получается вывести сообщение о количестве строк:
Sub bb() Const TXT$ = "произвольный текст" Dim r As Range, x Set r = Selection.Range r.Collapse Direction:=wdCollapseStart For Each x In Split(TXT) r.InsertAfter x & " " r.Collapse Direction:=wdCollapseEnd Next MsgBox r.Information(wdFirstCharacterLineNumber) End Sub
Вопрос такой: Как вывести аналогичное сообщение (поправить код), если таблица размещена внутри надписи?
______________
форматируйте код с помощью тегов!
Последний раз редактировалось Serge_Bliznykov; 13.09.2013 в 13:39 .
Просмотр статистики
Word подсчитывает количество слов в документе при вводе текста. Word также учитывает страницы, абзацы, строки и символы.
Если нужно узнать, сколько слов, страниц, знаков, абзацев или строк содержит документ, проверьте строку состояния.

Чтобы узнать количество слов во фрагменте документа, выделите нужный текст. В строке состояния будет отображено количество слов в выделенном тексте и во всем документе.

Совет: Чтобы узнать количество символов, строк и абзацев в документе, щелкните счетчик слов в строке состояния.
Подсчет количества символов, строк и абзацев
Чтобы открыть диалоговое окно «Статистика» и узнать число знаков, строк, абзацев и другие сведения, щелкните поле статистики в строке состояния в Word для Mac. Если текст не выделен, Word подсчитывает число слов и знаков во всем документе и отображает его в диалоговом окне «Статистика».

Подсчет количества слов в части документа
Чтобы подсчитать количество слов в определенной части документа, выделите нужный текст. Затем в меню Сервис выберите пункт Статистика.
Так же, как Word настольная программа, Word в Интернете считает слова, пока вы печатаете.

Если статистика не отображается в нижней части окна, убедитесь, что выбран режим правки (выберите Редактировать документ > Изменить в Word в Интернете).
Щелкните кнопку статистики, чтобы включить или выключить ее.

Наверное, вы заметили, что в Word в Интернете отображается приблизительная статистика. Это потому, что не учитываются слова в таких областях, как текстовые поля, верхние и нижние колонтитулы Графические элементы SmartArt. Если вам нужно точное количество слов, нажмите Открыть в Word и посмотрите количество слов в нижней части Wordокна документа.
Подсчет количества строк или столбцов в Excel
Если вам нужен быстрый способ подсчета строк, содержащих данные, вы можете выбрать все ячейки в первом столбце этих данных (возможно, это не столбец A). Просто щелкните заглавную кнопку столбца. В строке состояния в правом нижнем углу окна Excel вы можете подсчитать количество строк.
Сделайте то же самое, чтобы подсчитать количество столбцов, но в этот раз щелкните селектор строки в левой части строки.
Затем в области состояния отображается количество, что-то вроде этого:

Если вы выберете всю строку или столбец, Excel подсчитываются только ячейки, содержащие данные. Если вы выберете блок ячеек, будет подсчитано количество выбранных ячеек. Если выбранная строка или столбец содержит только одну ячейку с данными, строка состояния останется пустой.
- Если вам нужно подсчитать символы в ячейках, см. подсчет символов в ячейках.
- Если вы хотите узнать, сколько ячеек имеет данные, см. подсчет непустых ячеек с помощью счёта СЧЁТ.
- Вы можете управлять сообщениями, которые отображаются в панели состояния, щелкнув правой кнопкой мыши ее и щелкнув элемент, который вы хотите увидеть или удалить. Дополнительные сведения см. в Excel состояния.
Дополнительные сведения
Вы всегда можете задать вопрос эксперту в Excel Tech Community или получить поддержку в сообществах.
