Добавление общего числа страниц в номер страницы
Word для Microsoft 365 Word для Microsoft 365 для Mac Word для Интернета Word 2021 Word 2021 для Mac Word 2019 Word 2019 для Mac Word 2016 Word 2016 для Mac Word 2013 Word 2010 Word для Mac 2011 Еще. Меньше
Вставка в формате «Страница X из Y»
Если у вас уже есть верхний или нижний колонтитул, сначала щелкните или коснитесь места, где нужно добавить номер страницы.
- Выберите Вставка >Номер страницы.
- Выполните одно из указанных ниже действий.
- Выберите вариант Текущее положение, если у вас есть верхний или нижний колонтитул.
- Выберите расположение, если у вас еще нет колонтитулов.
- Прокрутите до варианта Страница X из Y и выберите формат.
- Нажмите Закрыть окно колонтитулов или дважды щелкните в любом месте за пределами области колонтитулов.
- Дважды щелкните колонтитул, где нужно добавить номер страницы.
- Выберите Колонтитулы >Нижний колонтитул, прокрутите до варианта Семафор и выберите его.
- Нажмите Закрыть окно колонтитулов или дважды щелкните в любом месте за пределами области колонтитулов, чтобы выйти.
Дополнительные сведения
- Выберите Вставка >Номера страниц
- Выберите вариант Добавить число страниц в формате X из Y.
- Выберите расположение.
Чтобы удалить номера страниц, повторите эти действия, но выберите пункт Удалить номера страниц.
Дополнительные сведения о номерах страниц см. в статье Нумерация страниц в Word.
2 быстрых способа подсчитать общее количество страниц и слов для нескольких документов Word
Время от времени, работая над длинным документом, мы склонны разбивать содержимое на несколько файлов Word, например, помещая разные главы в несколько документов. Затем, когда дело доходит до подсчета общего количества страниц и слов, это может быть немного утомительно, так как вам нужно открывать каждый отдельный документ и проверять информацию.
Поэтому мы перечисляем 2 быстрых метода, которые помогут сэкономить ваше драгоценное время.
Способ 1: проверьте детали в папке с файлами
В тексте мы приведем пример под среду Windows 7.
- Прежде всего, организуйте все документы для проверки в одной папке с файлами.
- Затем откройте папку с файлами и нажмите кнопку «Дополнительные параметры» рядом с «Изменить вид».

- Далее нажмите «Подробнее».

- Теперь щелкните правой кнопкой мыши строку заголовка и выберите «Дополнительно».

- В диалоговом окне «Выбрать детали» установите флажки «Страницы» и «Количество слов».
- Затем нажмите «ОК».


Теперь будет 2 новых столбца, отображающих страницы и слова каждого документа. Вам просто нужно сложить эти числа вместе.
Однако этот метод дает вам только приблизительное количество слов в каждом файле. Таким образом, для получения более точной цифры можно выбрать способ 2.
Способ 2: создать макрос
- Аналогично положить все tarсначала получить документы в одной папке с файлами.
- Затем откройте Word и перейдите на вкладку «Разработчик».
- Затем нажмите «Visual Basic», чтобы открыть редактор VBA. Или вы можете просто нажать «Alt + F11».

- Теперь нажмите «Обычный» и «Вставить».
- Затем выберите «Модуль».

- Затем дважды щелкните новый модуль и вставьте следующие коды в область редактирования:
Sub GetAllPageNumbers() Dim objWordApplication As Word.Application Dim nPageNumber As Long Dim nWordNumber As Long Dim objFile As Variant Dim objFileSystem As Object Dim objFolders As Object nPageNumber = 0 Set objWordApplication = New Word.Application Set objFileSystem = CreateObject("scripting.filesystemobject" ) Установить objFolders = objFileSystem.getfolder("C:\Users\Test\Desktop\files") для каждого objFile в objFolders.Files 'Обрабатывать только нескрытые файлы If (objFile.Attributes And 2) = 0 Then With objWordApplication .Documents .Open (objFile) nPageNumber = nPageNumber + .ActiveDocument.ComputeStatistics(wdStatisticPages) nWordNumber = nWordNumber + .ActiveDocument.ComputeStatistics(wdStatisticWords) .ActiveDocument.Close (False) End With End If Next objFile MsgBox ("pages:" & nPageNumber & " " & "words:" & nWordNumber) Установить objFile = Ничего Установить objFileSystem = Ничего Установить objFolders = Ничего Установить objWordApplication = Ничего Конец Sub
- Наконец, нажмите «Выполнить». Затем вас встретит окно сообщения с указанием номера страницы и общего количества слов, как показано ниже:


Примечание. «C:\Users\Test\Desktop\files» относится к папке с файлами.
Остерегайтесь повреждения документов
Поскольку нам приходится иметь дело со всевозможными отчетами каждый день, рекомендуется создавать резервные копии некоторых важных файлов на случай их повреждения, поскольку резервное копирование всегда является жизненно важной частью системы безопасности для защиты целостности файлов. Однако дело в том, что резервные копии также могут быть повреждены. И тогда вам понадобится выдающийся инструмент для восстановления поврежденных файлов Word
Как автоматически посчитать число страниц в разных файлах?
![]()
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.
Похожий контент
![]()
От Павел Бар
Некоторое время назад начались проблемы при работе в браузере (файрфокс), с некой периодичностью при нажатии на различные ссылки, тексты , кнопки, страницы, статьи и т.д. параллельно открываются различные страницы разных сайтов, начиная от игры престолов, игрового вулкан и страница фейсбука даже, что очень странно для меня, пока нажимал на вашем сайте — пару раз открылась страница фейсбука с предложением регистрации, открывалась страница с предложением обновить адобфлешплеер и т.д.
К сожалению причину появления установить не могу.
Периодичность открытия разная, иногда выскакивают с сайтов поиска работы и с различных других мест посещения.
Прошу о помощи , если есть возможность избавиться от сего хлама ?
Заранее благодарен, Павел
Kaspersky Virus Removal Tool 2015; Dr.Web CureIt!. — обе проги ни чего не нашли, вирусы по нулям. CollectionLog-2016.08.09-02.51.zip
Как посчитать страницы в ворде
Собственно проблема следующая:
перебираю файлы с обчитыванием количества страниц с Tiff и mdi разобрался, вот наткнулся на doc и docx и не могу нигде получить толкового объяснения как получить количество страниц все-таки.
Макет = ПолучитьМакет(«ДоговорНаУслуги»);
КомОбъект = Макет.Получить();
КомОбъект.Variables.Item(«ДатаДоговора»).Value = Формат(ДатаДоговора,»ДФ=дд ММММ гггг») + «г.»;
КомОбъект.Fields.UpDate();
КомОбъект.SaveAS(ИмяКаталога + «\Договор на услуги.docx»);
Строка = ЭлементыФормы.ТаблицаПриложений.Значение.Добавить();
Строка.НомерПП = ЭлементыФормы.ТаблицаПриложений.Значение.Количество();
Строка.Наименование = «Договор на услуги»;
Строка.Экземпляров = 2;
Строка.Страниц = . //КомОбъект.ActiveDocument.PageSetup.Pages.Count;
PageSetup.Pages.Count — это в екселе там количество страниц лежит, а где в ворде?
чей-то чужой код:
w := CreateOleObject(‘Word.Application’);
w.Documents.Open (FileName:=Doc);
PageCount := w.Documents.Item(DocName).ComputeStatistics(Statistic:=wdStatisticPages);