Добавление номеров страниц в верхний или нижний колонтитул в Word
Совет: После того как вы вставите в колонтитулы номера страниц, вам может потребоваться переместить в них некоторые графические и другие элементы.
Добавление номеров страниц в верхний или нижний колонтитул
- Выберите Вставка >Номера страниц.
- Выберите положение (слева, по центру или справа в верхнем или нижнем колонтитуле).
- Установите флажок Добавить число страниц, чтобы отобразить общее число страниц (например, 7 из 9).
Чтобы увидеть колонтитулы с номерами страниц, выберите Вид > Режим чтения.
Дополнительные сведения о номерах страниц см. в статье Нумерация страниц в Word.
Научный форум dxdy
с этим нумерация становится 14, но вверху страницы появляется линия. и на странице содержания нумарция обычноя.
\pagestyle
\fancyhf<>
\fancyfoot[C]<<\Large \arabic
Re: Как изменить размер шрифта нумерации сраниц
17.12.2010, 01:59
А можно по‐простому: в преамбуле
\makeatletter
\renewcommand<\hfil \large \arabic
\renewcommand<\hfil \large \arabic
\makeatother
PS Хоть бы добрый модератор название темы поправил…
Re: Как изменить размер шрифта нумерации сраниц
17.12.2010, 02:13
Один вопрос. нумерация содержания остается прежней в чем может быть дело?
Re: Как изменить размер шрифта нумерации сраниц
17.12.2010, 02:25
Оглавление? А попробуйте заключить оглавление в группу, а внутри неё переопределить
\renewcommand<\large\arabic
13.03.2011, 21:25
Подскажите, пожалуйста, как изменить расположение номера страници по вертикали?
13.03.2011, 21:36
ana в сообщении #422597 писал(а):
Подскажите, пожалуйста, как изменить расположение номера страници по вертикали?
Может быть, достаточно изменить размер полей? Можете попробовать что-нибудь вроде
\usepackage[left=30mm, right=20mm, top=20mm, bottom=20mm]
Параметры вроде интуитивно понятные. При необходимости можете глянуть документацию к пакету geometry, там много интересного.
13.03.2011, 22:00
С пакетом geometry у меня какая-то проблема
! LaTeX Error: Option clash for package geometry.
Я меняю параметры страницы так
\textheight=24.2cm
\oddsidemargin=-0.4mm
\evensidemargin=-0.4mm
\topmargin=-0.4mm
\footskip=30mm
При чем изменение последнего параметра \footskip=30mm не влияет на расположение номера страницы.
14.03.2011, 01:26
Изменение параметра \voffset=-2cm сдвигает положение текста на странице вместе с номером страницы, но потом текст через \topmargin можно вернуть на место, т.о. решил проблему этим путём. Мне не очень понятно почему \footskip не действует, по книжке, вроде, он должен отвечать за сдвиг нижнего колонтула (если, конечно, номер страницы отностся к нижнему колонтитулу).
Как изменить шрифт в нумерации страниц
Условия тестирования кода:
колонтитул в первом разделе в активном документе пустой.
Вставка номера страницы и прямое форматирование номера страницы (прямое форматирование — это форматирование текста без использования стилей):
Sub Procedure_1() Dim mySection As Word.Section Dim myPageNumberRange As Word.Range '1. Даём VBA-имя первому разделу в документе. Set mySection = ActiveDocument.Sections(1) '2. Вставляем виртуальную закладку "myPageNumberRange" 'в обычный нижний колонтитул (всего 3 вида колонтитулов). Set myPageNumberRange = mySection.Footers(wdHeaderFooterPrimary).Range '3. Вставляем в то место, где находится закладка, номер страницы. 'Номер страницы - это "поле". 'Часть кода получена с помощью макрорекордера. myPageNumberRange.Fields.Add Range:=myPageNumberRange, Type:=wdFieldEmpty, _ Text:="PAGE", PreserveFormatting:=True '4. Форматируем фрагмент колонтитула, где находится виртуальная закладка. With myPageNumberRange .Font.Size = 12 .Font.Name = "Times New Romans" End With End SubПоследний раз редактировалось Скрипт; 21.03.2013 в 20:44 .
Форумчанин
Регистрация: 24.12.2012
Сообщений: 906
Вставка номера страницы и применения к номеру страницы стиля «Номер страницы». Это позволит в дальнейшем, если вдруг будут изменения в оформлении документов, изменять не каждый номер страницы отдельно, а просто, изменив параметры стиля «Нижний колонтитул»:
Sub Procedure_2() Dim mySection As Word.Section Dim myPageNumberRange As Word.Range Set mySection = ActiveDocument.Sections(1) Set myPageNumberRange = mySection.Footers(wdHeaderFooterPrimary).Range myPageNumberRange.Fields.Add Range:=myPageNumberRange, Type:=wdFieldEmpty, _ Text:="PAGE", PreserveFormatting:=True 'Форматируем стиль, который применим к номеру страницы. 'Некоторые стили имеют специальные названия, что удобно использовать, 'если макросу надо будет работать в программах "Word" 'с разными языками. With ActiveDocument.Styles(wdStylePageNumber) .Font.Size = 12 .Font.Name = "Times New Romans" End With 'Применяем к фрагменту нижнего колонтитула, где находится 'виртуальная закладка "myPageNumberRange", стиль "Нижний колонтитул". With myPageNumberRange .Style = ActiveDocument.Styles(wdStylePageNumber) End With End SubИзменить размер шрифта нумерации страниц
Как добавить автоматически нумерацию страниц я представляю. Но как при этом указать шрифт и размер? и расположить на 2-3 мм пониже, так как иногда почему то «прилипает» к тексту.
2 Ответ от Alex_Gur 21.03.2013 13:44:57
Re: Изменить размер шрифта нумерации страниц
Какая у вас версия Word?
Вы хотите добавить нумерацию с помощью макроса или стандартным способом с помощью интерфейса?
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк — 41001162202962; на WebMoney — R581830807057.
3 Ответ от alexan0308 21.03.2013 14:06:38
Re: Изменить размер шрифта нумерации страниц
С помощью макроса. А узнать с помощью записи макроса не получается, блокируется поле номера страницы
4 Ответ от Alex_Gur 22.03.2013 08:16:32
Re: Изменить размер шрифта нумерации страниц
К сожалению, я еще не встречал установку нумерации страниц с помощью макроса.
Если найдете решение, поделитесь им, пожалуйста, в этой ветке.
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк — 41001162202962; на WebMoney — R581830807057.
5 Ответ от alexan0308 06.04.2013 16:58:25
Re: Изменить размер шрифта нумерации страниц
В общем я сделал, но у меня все на Delphi. При желании перевести на язык макросов несложно.
Итак, добавление нумерации страниц
mySection:=W.ActiveDocument.Range.Sections.item (1); MyPageNuraber:=mySection.Footers.item(1).PageNumbers.Add(PageNumberAlignment:=wdAlignPageNumberCenter, FirstPage:=False);W.ActiveDocument.Sections.Item(1).Footers. Item(wdHeaderFooterPrimary).PageNumbers.Item(1).Select; W.Selection.font.size:=12;Здесь можно сделать что угодно
Сообщений [ 5 ]
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Похожие темы
- при сохранении в RTF произвольно меняется размер шрифта
- Как изменить размер отдельной страницы с оглавлением?
- Изменить нумерацию страниц
- Ориентация нумерации страниц
- Создание нумерации страниц в штампе
- Оглавление при двойной нумерации страниц
- Как убрать затенение полей при нумерации страниц?
- Удаление римской (текстовой) нумерации страниц .
Изменить размер шрифта нумерации страниц
Для тех, кто желает улучшить свои показатели при работе с текстами, совершенствовать знания и перенять опыт других пользователей Ворда, существует очень хороший русскоязычный ресурс Ворд Эксперт. Наш сайт о Microsoft Office Word даст ответ про: как суммировать в ворде 2007 сумм.
На форуме вы найдете список необходимой литературы по работе с приложением и программированию, основы создания макросов и написания шаблонов, узнаете много нового о настройках различных Вордовских функций и миниутилит. Наш сайт о Microsoft Office Word даст ответ про: как вписать в список литературы ссылку с интернета.
Главный упор делается на автоматизацию работы, но и обсуждению достоинств и недостатков различных версий уделено много внимания. Наш сайт о Microsoft Office Word даст ответ про: word 2010 вставка одного значения в нескольких местах документа. Кроме того, здесь можно заказать готовые шаблоны или макросы под вашу задачу.
страницы
- полезности word
- книги и программы
- о проекте
- стать автором
- реклама на сайте
- правовая информация
авторство
© 2006 — 2016, Word Expert
Авторские права на все материалы, опубликованные на сайте WordExpert.ru (включая текст, иллюстрации, фотографии, подборку, расположение и т.п.), принадлежат администрации Word Expert, если не указано иное.