Shapes.AddWebVideo (Word)

Adiciona um novo vídeo da Web ao documento.

AddWebVideo (EmbedCode, VideoWidth, VideoHeight, PosterFrameImage, Url, Left, Top, Width, Height, Anchor)


Dim strEmbedCode As String: strEmbedCode = 
Dim iVideoWidth As Integer: iVideoWidth = 
Dim iVideoHeight As Integer: iVideoHeight =  
Dim shpAddWebVideo As Shape
Set shpAddWebVideo = Selection.HeaderFooter.Shapes.AddWebVideo(EmbedCode:=strEmbedCode, VideoWidth:=iVideoWidth, VideoHeight:=iVideoHeight)

Arguments

O seguinte argumento é opcional

EmbedCode (String) - O código HTML a ser inserido.

VideoWidth (Integer) - Um inteiro que representa a largura do vídeo da Web em pixels.

VideoHeight (Integer) - Um inteiro que representa a altura do vídeo da Web em pixels.

Optional arguments

Os seguintes argumentos são opcionais

PosterFrameImage (String) - Uma cadeia de caracteres que aponta para o arquivo a ser usado como o quadro de cartaz para o vídeo da Web.

Url (String) - Uma cadeia de caracteres que contém a URL para o vídeo da Web.

Left (Long) - A posição, medida em pontos, da borda esquerda do quadro do cartaz da borda do documento.

Top (Long) - A posição, medida em pontos, da borda superior do quadro do cartaz da borda do documento.

Width (Long) - A largura, medida em pontos, do quadro do cartaz no documento.

Height (Long) - A altura, medida em pontos, do quadro do cartaz no documento.

Anchor (Range) - Um objeto Range que representa o texto ao qual o vídeo da Web está vinculado. Se Anchor for especificado, a âncora será posicionada no início do primeiro parágrafo no intervalo de ancoragem. Se esse argumento for omitido, o intervalo de ancoragem será selecionado automaticamente e o vídeo será posicionado em relação às bordas superior e esquerda da página.