2016-10-25 3 views
0

Интересно, может ли кто-нибудь помочь мне; Я создал очень большую PowerPoint (2016), в которой есть разные разделы, и в настоящее время я использую настраиваемое раскрывающееся меню для навигации по слайдам, но мне интересно, есть ли способ, который я мог бы (с первого слайда) выбрать несколько слайдов (скажем, 1, 3, 8, 16, 20), а затем нажмите go. Тогда будут показаны только те слайды.Пользовательские слайды PowerPoint

Не уверен, что это возможно, если это возможно, вы можете указать мне в правильном направлении, как это сделать?

Заранее спасибо.

ответ

0

Я не использую powerpoint слишком часто, поэтому извиняюсь, если это не поможет.

Dim iCount As Integer 

Public Sub Load() 
ListBox1.Clear 
ListBox1.MultiSelect = fmMultiSelectMulti 

For iCount = 1 To ActivePresentation.Slides(ActivePresentation.Slides.Count).SlideNumber 
    ListBox1.AddItem iCount 
Next iCount 

End Sub 

Private Sub CommandButton1_Click() 

For iCount = 1 To ActivePresentation.Slides(ActivePresentation.Slides.Count).SlideNumber 
    ActivePresentation.Slides(iCount).SlideShowTransition.Hidden = msoFalse 
Next iCount 

For iCount = 0 To ListBox1.ListCount - 1 
    If ListBox1.Selected(iCount) Then ActivePresentation.Slides(iCount + 1).SlideShowTransition.Hidden = msoCTrue 
Next iCount 
End Sub 

Я создал список и кнопку на первом слайде (добавлен через вкладку разработки). Все номера слайдов добавляются в этот список, когда выполняется подпункт «Загрузка», затем, когда кнопка нажата, все выбранные слайды становятся видимыми, все остальные скрыты. При необходимости это можно отбросить. Дайте мне знать, если вам нужна помощь, я рад внести любые изменения.

+0

Спасибо, попробовал, но не повезло, наверное, я не делаю что-то правильно. Не могли бы вы послать мне PPt, чтобы я мог посмотреть, или вы хотите, чтобы я отправил вам то, что я сделал? – RJPhoto

+0

Я создал ListBox и Button на первом слайде и не переименовал ни один из объектов. Затем я открыл редактор VBA и перешел на первый слайд, я добавил код выше и нажал кнопку «Загрузить» и нажал F5, чтобы запустить его. Это должно заполнить список со всеми номерами слайдов в PowerPoint. Затем вы можете закрыть редактор VBA и использовать ListBox на слайде, чтобы выбрать слайды, которые вы хотите скрыть, и когда вы нажимаете кнопку, эти слайды должны быть скрыты. Не стесняйтесь присылать мне ссылку на файл, и я могу добавить код для вас, чтобы вы могли понять это. – Nulled

+0

Работайте отлично, спасибо. Знаете ли вы, как я могу изменить числа на имя слайда? У моих слайдов есть такие имена, как Welcome, Quiz, About и т. Д. – RJPhoto