InlineShapes.AddWebVideo (Word)

Agrega un nuevo vídeo web al documento.

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

Estos son los argumentos con nombre :

EmbedCode (String) - El código para insertar del vídeo.

VideoWidth - Integer

VideoHeight - Integer

Optional arguments

Los siguientes argumentos son opcionales

PosterFrameImage (String) - Una cadena que apunta al archivo que se va a usar como marco de póster para el vídeo web.

Url (String) - La dirección URL del vídeo.

Range - Range