Powerpoint - Pédagogie et numérique

VBA Powerpoint Supprimer toutes les vidéos

Posté le novembre 8, 2019 par fxp

Une petite macro pour supprimer toutes les vidéos d'une présentation powerpoint

Sub supprimerToutesVideos()
    answer = MsgBox("voulez-vous VRAIMENT supprimer toutes les videos?", vbOKCancel)
    If answer = vbOK Then
        Dim counter As Integer
        counter = 0
        For Each s In ActivePresentation.Slides
            For

… 👉 Lire la suite

VBA Powerpoint Démarrer les vidéo automatiquement

Posté le novembre 8, 2019 par fxp

Voici un bout de code en vba qui met toutes les vidéos de la présentation en démarrage automatique (par défaut, elles démarrent au clic).

Sub triggerAuto()
Dim counter As Integer
counter = 0
types = ""
For Each s In

… 👉 Lire la suite