InlineShapes.AddWebVideo (Word)
Ajoute une nouvelle vidéo Web au document.
AddWebVideo (EmbedCode, VideoWidth, VideoHeight, PosterFrameImage, Url, Range)
Dim strEmbedCode As String: strEmbedCode =
Dim iVideoWidth As Integer: iVideoWidth =
Dim iVideoHeight As Integer: iVideoHeight =
Dim iseAddWebVideo As InlineShape
Set iseAddWebVideo = ActiveDocument.Range.InlineShapes.AddWebVideo(EmbedCode:=strEmbedCode, VideoWidth:=iVideoWidth, VideoHeight:=iVideoHeight)
Arguments
Les arguments nommés :
EmbedCode (String) - Code incorporé pour la vidéo.
VideoWidth (Integer) - Entier qui représente la largeur de la vidéo Web en pixels.
VideoHeight (Integer) - Entier qui représente la hauteur de la vidéo Web en pixels.
Optional arguments
Les arguments suivants sont facultatifs
PosterFrameImage (String) - Chaîne qui pointe vers le fichier à utiliser comme cadre d’affiche pour la vidéo Web.
Url (String) - URL de la vidéo.
Range (Range) - Plage à laquelle insérer la vidéo Web.