Прочее компьютерное
Как пересчитать количество символов (со знаками и пробелами) на 1 страничке в Word?
рецензирование - статистика
Иван Anubis Пылаев
Оно?

Внизу слева есть "число слов", жмем на эту строчку, выскакивает статистика по всему документу.
Марат Дарханов
Не во всякой версии есть эта возможность?
Нажимаю ALT+F11?
В открывшемся VBA-редакторе в правом окошке Проекты нахожу свой файл и в + открываю строчку
ЭтотДосумент. Щелкаю по ней дважды, окрыввается справа окно макросов этого документа, в него вставляю текст:
Sub Число_символов ()
MsgBox "Символов = " & ActiveDocument.Characters.Count
End Sub
После чего устанавливаю курсор в этот текст макроса (не выше и не ниже) и жму А5.
Макрос считает с концами строк в том файле Word, который является текущим, то есть имеет синий заголовок.
Нажимаю ALT+F11?
В открывшемся VBA-редакторе в правом окошке Проекты нахожу свой файл и в + открываю строчку
ЭтотДосумент. Щелкаю по ней дважды, окрыввается справа окно макросов этого документа, в него вставляю текст:
Sub Число_символов ()
MsgBox "Символов = " & ActiveDocument.Characters.Count
End Sub
После чего устанавливаю курсор в этот текст макроса (не выше и не ниже) и жму А5.
Макрос считает с концами строк в том файле Word, который является текущим, то есть имеет синий заголовок.
Не во всякой версии есть эта возможность?
Нажимаю ALT+F11
В открывшемся VBA-редакторе в правом окошке Проекты нахожу свой файл и в + открываю строчку
ЭтотДокумент.
Щелкаю по ней дважды, открывается справа окно макросов этого документа, в него вставляю текст:
Sub Число_символов ()
MsgBox "Символов = " & ActiveDocument.Characters.Count
End Sub
После чего устанавливаю курсор в этот текст макроса (не выше и не ниже) и жму А5.
Макрос считает с концами строк в том файле Word, который является текущим, то есть имеет синий заголовок.
Управляющие коды мультитекта игнорируются.
Можно вставить макрос в другое место - в шаблон Normal (виден повыше). разворачиваем дерево Normal, через меню Insert вставляем модуль Module1, затьем щелкает по нему дважды, вставляем справа текст макроса.
Переименовываем наш модуль внизу слева - свойство (Name) Счетчики.
Аналогичные макросы-счетчики можно создать и для слов, абзацев, разделов, таблиц, предложений, заменив
Character на Words, Paragrafs, Tables, Sections, Sentenses и добавив их тексты в тот же модуль.
Пора работать творчески.
Можно создать свою Панель инструментов, и для каждого макроса на ней создать красивые кнопки с подсказкой.
А можно все команды собрать в одном макросе и получить кучу свойств сразу за одно нажатие.
Нажимаю ALT+F11
В открывшемся VBA-редакторе в правом окошке Проекты нахожу свой файл и в + открываю строчку
ЭтотДокумент.
Щелкаю по ней дважды, открывается справа окно макросов этого документа, в него вставляю текст:
Sub Число_символов ()
MsgBox "Символов = " & ActiveDocument.Characters.Count
End Sub
После чего устанавливаю курсор в этот текст макроса (не выше и не ниже) и жму А5.
Макрос считает с концами строк в том файле Word, который является текущим, то есть имеет синий заголовок.
Управляющие коды мультитекта игнорируются.
Можно вставить макрос в другое место - в шаблон Normal (виден повыше). разворачиваем дерево Normal, через меню Insert вставляем модуль Module1, затьем щелкает по нему дважды, вставляем справа текст макроса.
Переименовываем наш модуль внизу слева - свойство (Name) Счетчики.
Аналогичные макросы-счетчики можно создать и для слов, абзацев, разделов, таблиц, предложений, заменив
Character на Words, Paragrafs, Tables, Sections, Sentenses и добавив их тексты в тот же модуль.
Пора работать творчески.
Можно создать свою Панель инструментов, и для каждого макроса на ней создать красивые кнопки с подсказкой.
А можно все команды собрать в одном макросе и получить кучу свойств сразу за одно нажатие.
Похожие вопросы
- У меня на клавиатуре ноутбука необычные символы, которых нету на других клавиатурах ( 1/2, параграф, АЕ...)
- 120 тысяч знаков с пробелами, это сколько страниц в ворде?
- windows 8. Как увеличить возможное количество символов в именах файлов? Для .JPG к примеру.
- Испорчен Word-овский документ, Вместо букв пустые пробелы...
- как убрать точки (НЕ знаки препинания) , которые word 2003 ставит там, где пробелы?
- Как в Microsoft Word напечатать символ "альфа"????
- скачиваю документ в word открывает с какими то странными символами. что делать? подскажите!
- Как в Microsoft Word вставить галочку? И не надо мне говорить про вставка->символы. Укажите конкретный код, или способ.
- Ответьте пожалуйста на вопросы которые можете по MS Word, Excel
- Почему нужно соблюдать правила машинописи? Например, не ставить пробел перед точкой...