Método Shapes.AddOLEObject (PowerPoint)

Artigo
04/07/2023

Cria um objeto OLE. Retorna um objeto Shape representando o novo objeto OLE.

Sintaxe

expression. AddOLEObject( _Left_, _Top_, _Width_, _Height_, _ClassName_, _FileName_, _DisplayAsIcon_, _IconFileName_, _IconIndex_, _IconLabel_, _Link_ )

expressão Uma variável que representa um objeto Formas.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Left	Opcional	Single	A posição (em pontos) do canto superior esquerdo do novo objeto em relação ao canto superior esquerdo do slide. O valor padrão é 0 (zero).
Top	Opcional	Single	A posição (em pontos) do canto superior esquerdo do novo objeto em relação ao canto superior esquerdo do slide. O valor padrão é 0 (zero).
Width	Opcional	Single	A largura inicial do objeto OLE, em pontos.
Height	Opcional	Single	A altura inicial do objeto OLE, em pontos.
ClassName	Opcional	String	O nome completo da classe do objeto OLE ou o ProgID para o objeto que está para ser criado. Você deve especificar os argumentos de ClassName ou de FileName para o objeto, mas não ambos.
FileName	Opcional	String	O arquivo a partir do qual o objeto será criado. Se o caminho não for especificado, será utilizada a pasta atual de trabalho. Você deve especificar os argumentos de ClassName ou de FileName para o objeto, mas não ambos.
DisplayAsIcon	Opcional	MsoTriState	Determina se o objeto OLE será exibido como um ícone.
IconFileName	Opcional	String	O arquivo que contém o ícone a ser exibido.
IconIndex	Opcional	Long	O índice do ícone em IconFileName. O primeiro ícone no arquivo possui o número de índice 0 (zero). Se um ícone com o número de índice determinado não existir em IconFileName, o ícone com o número de índice 1 (o segundo ícone no arquivo) é usado. O valor padrão é 0 (zero).
IconLabel	Opcional	String	Um rótulo (legenda) a ser exibido abaixo do ícone.
Link	Opcional	MsoTriState	Determina se o objeto OLE será vinculado ao arquivo do qual ele foi criado. Se você especificou um valor para ClassName, esse argumento deve ser msoFalse.

Valor de retorno

Forma

Exemplo

Este exemplo adiciona um documento do Word vinculado a myDocument.

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddOLEObject Left:=100, Top:=100, _ 
    Width:=200, Height:=300, _ 
    FileName:="c:\my documents\testing.doc", Link:=msoTrue

Este exemplo adiciona uma nova planilha do Microsoft Excel a myDocument. A planilha será exibida como um ícone.

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddOLEObject Left:=100, Top:=100, _ 
    Width:=200, Height:=300, _ 
    ClassName:="Excel.Sheet", DisplayAsIcon:=True

Este exemplo adiciona um botão de comando a myDocument.

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddOLEObject Left:=100, Top:=100, _ 
    Width:=150, Height:=50, ClassName:="Forms.CommandButton.1"

Confira também

Objeto Shapes

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.

Compartilhar via