powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Нумерация слайдов в PowerPoint
3 сообщений из 3, страница 1 из 1
Нумерация слайдов в PowerPoint
    #34728212
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Меня спросили сегодня, а я не знал как ответить. Никто не знает можно ли и как сделать нумерацию слайдов так, чтобы номер 1 стоял на 4-м слайде и так далее.
...
Рейтинг: 0 / 0
Нумерация слайдов в PowerPoint
    #34728273
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пока сделал так (через нижние колонтитулы), но может можно как то лучше
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Sub Нумеровать()
' нижние колонтитулы должны быть включены
' все текущие нижние колонтитулы при этом очистятся
Dim iSlide As Slide, n As Long
 ' сколько первых страниц не нумеруем
 n =  2 
    For Each iSlide In ActivePresentation.Slides
     With iSlide
        If .SlideNumber > n Then
           .HeadersFooters.Footer.Text = .SlideNumber - n
          Else
           .HeadersFooters.Footer.Text = ""
        End If
     End With
    Next
End Sub
...
Рейтинг: 0 / 0
Нумерация слайдов в PowerPoint
    #34728863
Deggasad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Лучше - значит чтобы само бы нумеровалось, а не запускать каждый раз.
Например написать в нижнем колонтитуле №СТР - 2 и чтобы он сам каждый раз считал
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Нумерация слайдов в PowerPoint
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]