Méthode WebPageOptions.SetBackgroundSoundRepeat (Publisher)
Spécifie si le son d’arrière-plan attaché à une page web doit être lu à l’infini après le chargement de la page dans un navigateur web et, si ce n’est pas le cas, spécifie éventuellement le nombre de fois où le son d’arrière-plan doit être lu.
Syntaxe
expression. SetBackgroundSoundRepeat (RepeatForever, RepeatTimes)
Expression Variable qui représente un objet WebPageOptions .
Paramètres
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
RepeatForever | Obligatoire | Boolean | Spécifie si le fond sonore doit être exécuté en continu. La valeur de ce paramètre est utilisée pour remplir la valeur de la propriété BackgroundSoundLoopForever . |
RepeatTimes | Facultatif | Long | Spécifie le nombre de lectures du fond sonore. La valeur de ce paramètre est utilisée pour remplir la valeur de la propriété BackgroundSoundLoopCount . |
Remarques
Si le paramètre RépéterIndéfiniment a pour valeur True, le paramètre facultatif NbreRépétitions ne peut pas être spécifié. Si vous tentez de spécifier une valeur pour l’argument NbreRépétitions alors que RépéterIndéfiniment a pour valeur True, une erreur d’exécution est générée.
Si le paramètre RépéterIndéfiniment a pour valeur False, le paramètre facultatif NbreRépétitions doit être spécifié. Si vous ne spécifiez pas de valeur pour NbreRépétitions alors que RépéterIndéfiniment a pour valeur False, une erreur d’exécution est générée.
Exemple
L’exemple suivant définit le son d’arrière-plan de la page 4 de la composition web active sur un fichier .wav sur l’ordinateur local. Si BackgroundSoundLoopForever a la valeur False, la méthode SetBackgroundSoundRepeat est utilisée pour spécifier que le son de fond doit être répété à l’infini (notez l’omission du paramètre RepeatTimes ).
Si BackgroundSoundLoopForever a la valeur True, la méthode SetBackgroundSoundRepeat est utilisée pour indiquer que le fond sonore ne pas être répété indéfiniment, mais qu'elle doit être répétée à deux reprises.
Dim theWPO As WebPageOptions
Set theWPO = ActiveDocument.Pages(4).WebPageOptions
With theWPO
.BackgroundSound = "C:\CompanySounds\corporate_jingle.wav"
If .BackgroundSoundLoopForever = False Then
.SetBackgroundSoundRepeat RepeatForever:=True
ElseIf .BackgroundSoundLoopForever = True Then
.SetBackgroundSoundRepeat RepeatForever:=False, RepeatTimes:=2
End If
End With
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour