Comment déterminer le chemin du fichier audio et la disponibilité dans PowerPoint 2010
-
28-09-2019 - |
Question
Je Duplication avec des changements de date de mineures, des diaporamas créé par un autre utilisateur, qui a constamment oublié de l'audio, mais des liens Embed à la place.
est-il un moyen simple de déterminer si le son est intégré ou lié, et ce que le chemin du fichier source est, si elle est liée? Si je pouvais exécuter une macro pour déterminer exactement ce que cela aiderait énormément.
Je ne sais pas comment aborder ce sujet, mais l'ouverture individuelle des dizaines de fichiers pour déterminer audio est là défaites tout ce qui est scénarisé dans ce cas.
La solution
Ceci est la façon dont je le ferais:
Sub DetermineAudioLinks()
Dim p As Presentation: Set p = ActivePresentation
Dim s As Slide
Dim sh As Shape
For Each s In p.Slides
For Each sh In s.Shapes
If sh.Type = msoMedia Then
If sh.MediaType = ppMediaTypeSound Then
Debug.Print "Slide " & s.SlideNumber & ":" ; sh.Name
If sh.MediaFormat.IsLinked Then
Debug.Print vbTab & "Is Linked: True"
Debug.Print vbTab & sh.LinkFormat.SourceFullName
End If
End If
End If
Next
Next
End Sub
Notez la propriété de MediaFormat
ci-dessus est PowerPoint 2010 seulement -. Il ne fonctionnera pas avec les versions antérieures de PowerPoint