InlineShapes.AddOLEObject (Word)
Cria um objeto OLE. Retorna o objeto InlineShape que representa o novo objeto OLE.
AddOLEObject (ClassType, FileName, LinkToFile, DisplayAsIcon, IconFileName, IconIndex, IconLabel, Range)
ActiveDocument.InlineShapes.AddOLEObject _
ClassType:="Excel.Sheet", DisplayAsIcon:=False, _
Range:=ActiveDocument.Paragraphs(2).Range
Arguments
Optional arguments
Os seguintes argumentos são opcionais
ClassType (String) - O nome do aplicativo usado para ativar o objeto OLE especificado.
FileName (String) - O arquivo a partir do qual o objeto será criado. Se esse argumento for omitido, a pasta atual será usada. Você precisa especificar o argumento ClassType ou o argumento FileName para o objeto, mas não ambos.
LinkToFile (Boolean) - True para vincular o objeto OLE ao arquivo do qual ele foi criado. False para tornar o uma cópia independente do arquivo de objeto OLE. Se você especificou um valor para ClassType, o argumento LinkToFile deve ser False. O valor padrão é False.
DisplayAsIcon (Boolean) - True para exibir o objeto OLE como um ícone. O valor padrão é False.
IconFileName (String) - O arquivo que contém o ícone a ser exibido.
IconIndex (Long) - O número de índice do ícone no IconFileName. A ordem dos ícones no arquivo especificado corresponde à ordem na qual os ícones aparecem na caixa de diálogo Alterar ícone (menu Inserir, caixa de diálogo Objeto), quando a caixa de seleção Exibir como ícone está marcada. O primeiro ícone no arquivo tem 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 (String) - Um nome (legenda) a ser exibido abaixo do ícone.
Range (Range) - O intervalo onde o objeto OLE será colocado no texto. O objeto OLE substitui o intervalo, a não ser que o intervalo esteja recolhido. Se esse argumento for omitido, o objeto será colocado automaticamente.