user_mobilelogo

Word 365

Vous saurez tout !

 

Pour tout connaître sur Word
Nouvelle version !

600 pages !

9,80 € 

 

En savoir plus.

Vous l'avez remarqué : lorsque les animations ont été jouées, elles ne seront pas rejouées une seconde fois, sauf, bien entendu, dans un diaporama qui tourne en boucle.

Dans cet autre article, je donne la solution qui passe par un diaporama personnalisé et qui permet de revenir autant de fois qu'on le souhaite sur une diapo particulière (ou un groupe de diapo) et d'en rejouer les animations.

Voici une autre solution qui passe par une macro et qui permettra, contrairement à l'article cité ci-dessus, de relancer les animations de la diapositive en cours d'affichage. Pour cela vous devrez affecter la macro à un objet quelconque situé sur la diapositive.

Si vous souhaitez pouvoir utiliser cette macro ponctuellement, mais à tout instant et sur n'importe quelle diapo en cours d'affichage, vous pourrez mettre l'objet sur lequel cliquer dans le masque. Ainsi il sera disponible depuis n'importe quelle diapo.


Sub rejoue()
Dim diapo
diapo = SlideShowWindows(1).View.CurrentShowPosition
SlideShowWindows(1).View.GotoSlide diapo, True
End Sub
 

S'il s'agit de systématiquement relancer TOUTES les animations sur TOUTES les diapos, à chaque fois qu'on les réaffiche, utilisez la macro suivante :

Sub OnSlideShowPageChange(ByVal SSW As SlideShowWindow)
Dim diapo
On Error Resume Next
diapo = SSW.View.CurrentShowPosition
SlideShowWindows(1).View.GotoSlide diapo, True
End Sub

Statistiques

Aujourd'hui2825
Hier3263
Cette semaine9373
Ce mois68714
Total depuis 200412747159

18
visiteurs actuellement en ligne

27 janvier 2021