PowerPoint의 애니메이션을 슬라이드로 "펼칠"수 있습니까?

debugcn 에 게시 Dev

mwil.me

현재 Powerpoint에서 애니메이션을 포함하지 않아도되는 "최종 보고서"문서를 준비 중입니다. 그러나 결합 할 다양한 소스 문서에는 애니메이션이 포함됩니다.

각 애니메이션 단계에 대해 슬라이드를 자동으로 생성하는 방법을 찾고 있습니다. 기본적으로 애니메이션 단계를 사용하여 슬라이드를 PDF로 내보내는 것과 동일한 기능이지만 애니메이션 단계가 파워 포인트 슬라이드로 유지된다는 점이 다릅니다.

이를 자동으로 수행하는 방법이 있습니까? 아니면 슬라이드를 복제하고 애니메이션 단계를 직접 준비해야합니까?

Снаđошƒаӽ

Massimo Rimondini라는 사람이 만든 MS Office 용 PPspliT 추가 기능을 사용합니다 . 그것은 당신이 원하는 것을 정확하게 수행합니다. Office 2013에서 확인했는데 제대로 작동합니다.

보너스:

플러그인이 모든 애니메이션을 제거하지 못하고 별도의 슬라이드로 변환하는 데 실패한 경우 (가능성이 매우 낮음) 슬라이드 쇼를 위해 나머지 애니메이션을 비활성화하거나 매크로를 사용하여 모두 제거 할 수 있습니다.

애니메이션 비활성화 :

"슬라이드 쇼 설정"으로 이동하여 "옵션 표시"에서 "애니메이션없이 표시"옵션을 선택하고 확인을 클릭하여 애니메이션을 끌 수 있습니다. 이제 쇼를 실행하면 애니메이션없이 표시됩니다.

애니메이션을 모두 제거 :

단일 스윕에서 모든 애니메이션을 정말로 삭제하려면이 매크로를 실행해야합니다.

Sub StripAllBuilds()
    Dim I As Integer: Dim J As Integer
    Dim oActivePres As Object
    Set oActivePres = ActivePresentation
    With oActivePres
        For I = 1 To .Slides.Count
            If Val(Application.Version) < 10 Then
                ' Older versions of PowerPoint 97/2000
                ' In each slide set the animation property
                ' of the Shape object to FALSE
                For J = 1 To .Slides(I).Shapes.Count
                    .Slides(I).Shapes(J).AnimationSettings.Animate = msoFalse
                Next J
            Else
              ' New versions support the Timeline object
                For J = .Slides(I).TimeLine.MainSequence.Count To 1 Step -1
                    .Slides(I).TimeLine.MainSequence(J).Delete
                Next J
            End If
        Next I
    End With
    Set oActivePres = Nothing
End Sub

이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.

침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제

에서 수정2021-06-6

몇 마디 만하겠습니다

0리뷰

로그인참여 후 검토

Related 관련 기사

기사