2016-10-25 4 views
0

누군가 나를 도울 수 있는지 궁금합니다. 나는 아주 큰 파워 포인트 (2016)를 만들었고 다른 섹션과 나는 현재 사용자 정의 드롭 다운 메뉴를 사용하여 슬라이드 주위를 탐색하고 있지만 (첫 번째 슬라이드부터) 여러 슬라이드를 선택할 수있는 방법이 있는지 궁금하네요. (1, 3, 8, 16, 20)을 입력 한 다음 이동을 누르십시오. 그런 다음 해당 슬라이드 만 표시됩니다.PowerPoint 맞춤 슬라이드

이것이 가능한지 확실하지 않은 경우 올바른 방법으로이 작업을 수행 할 수 있습니까?

미리 감사드립니다.

답변

0

너무 자주 파워 포인트를 사용하지 않으므로 도움이되지 않으면 사과드립니다.

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 키를 눌러 실행했습니다. 이렇게하면 목록 상자에 파워 포인트 내의 모든 슬라이드 번호가 채워집니다. 그러면 VBA 편집기를 닫고 슬라이드 1의 ListBox를 사용하여 숨기려는 슬라이드를 선택하고 단추를 클릭하면 해당 슬라이드를 숨겨야합니다. 파일에 대한 링크를 보내 주시면 고맙게 생각할 수 있도록 코드를 추가해 드리겠습니다. – Nulled

+0

위대한 노력, 고마워. 번호를 슬라이드의 이름으로 어떻게 바꿀 수 있는지 아시겠습니까? 내 슬라이드에는 환영, 퀴즈, 정보 등의 이름이 있습니다. – RJPhoto

관련 문제