InlineShapes.AddWebVideo (Word)
Adds a new web video to the 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
The following arguments are required:
EmbedCode (String) - The embed code for the video.
VideoWidth (Integer) - An integer that represents the width of the web video in pixels.
VideoHeight (Integer) - An integer that represents the height of the web video in pixels.
Optional arguments
The following arguments are optional
PosterFrameImage (String) - A string that points to the file to use as the poster frame for the web video.
Url (String) - The URL to the video.
Range (Range) - The range at which to insert the web video. If Range is omitted, the current selection is used.