Нумерация страниц в Excel VBA

#excel #vba

#превосходить #vba

Вопрос:

Я могу пронумеровать страницы просто отлично, используя .Объект Pagesetup. Я могу использовать .DifferentFirstPageHeaderFooter, чтобы пропустить нумерацию первой страницы, но у меня также есть индекс, который я не хочу нумеровать, как мне начать нумерацию на 3-й странице?

 Dim ws As Worksheet Application.ScreenUpdating = False For Each ws In Worksheets  ws.PageSetup.DifferentFirstPageHeaderFooter = True  ws.PageSetup.RightFooter = "Page " amp; "amp;P" amp; " of "   "amp;N"   Next ws Set ws = Nothing Application.ScreenUpdating = True  

Комментарии:

1. ws.PageSetup.FirstPageNumber = 3

2. @cybernetic.nomad ws.Набор страниц. FirstPageNumber = 3 просто устанавливает 2-ю страницу на «страницу 3 из x» вместо»страница 2 из x».

3. Я также заметил, что как только нумерация страниц задана в VBA, она устанавливается для всей книги. Другими словами, он отображается в пользовательском интерфейсе после однократного запуска в VBA, поэтому изменение VBA может быть переопределено настройками в пользовательском интерфейсе.