Тема: Изменить размер шрифта нумерации страниц
Как добавить автоматически нумерацию страниц я представляю. Но как при этом указать шрифт и размер? и расположить на 2-3 мм пониже, так как иногда почему то "прилипает" к тексту.
- Alex_Gur
- Модератор
- Неактивен
Re: Изменить размер шрифта нумерации страниц
Какая у вас версия Word?
Вы хотите добавить нумерацию с помощью макроса или стандартным способом с помощью интерфейса?
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Re: Изменить размер шрифта нумерации страниц
С помощью макроса... А узнать с помощью записи макроса не получается, блокируется поле номера страницы
- Alex_Gur
- Модератор
- Неактивен
Re: Изменить размер шрифта нумерации страниц
К сожалению, я еще не встречал установку нумерации страниц с помощью макроса.
Если найдете решение, поделитесь им, пожалуйста, в этой ветке.
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.
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;Здесь можно сделать что угодно