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.