Método OLEFormat.ConvertTo (Word)

Converte o objeto OLE especificado de uma classe para outra, tornando possível editar o objeto em um aplicativo de servidor diferente ou alterar como o objeto é exibido no documento.

Sintaxe

expressão. ConvertTo ( ClassType, DisplayAsIcon, IconFileName, IconIndex, IconLabel )

expressão Obrigatório. Uma variável que representa um objeto OLEFormat.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
ClassType	Opcional	Variant	O nome do aplicativo usado para ativar o objeto OLE. Você pode ver uma lista de aplicativos disponíveis na caixa tipo de objeto na guia Criar novo na caixa de diálogo do objeto. Você pode encontrar a cadeia de caracteres ClassType inserindo um objeto como uma forma embutida e, em seguida, exibindo os códigos de campo. O tipo de classe do objeto segue a palavra "Incorporar" ou a palavra "LINK".
DisplayAsIcon	Opcional	Variant	True para exibir o objeto OLE como um ícone. O valor padrão é False.
IconFileName	Opcional	Variant	O arquivo que contém o ícone a ser exibido.
IconIndex	Opcional	Variantes	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 (caixa de diálogo Inserir Objeto), quando a caixa de seleção Exibir como ícone está marcada. O primeiro ícone do arquivo tem o número de índice 0 (zero). Se um ícone com o número de índice fornecido não existir no IconFileName, o ícone com o número de índice 1 (o segundo ícone no arquivo) será usado. O valor padrão é 0 (zero).
IconLabel	Opcional	Variant	Um nome (legenda) a ser exibido abaixo do ícone.

Exemplo

Este exemplo cria um novo documento e insere um documento do Word inserido com algum texto. O documento inserido é convertido em uma Imagem do Word.

Dim objEmbedded As Object 
 
Documents.Add 
 
Set objEmbedded = ActiveDocument.Shapes _ 
  .AddOLEObject(ClassType:= "Word.Document") 
objEmbedded.OLEFormat.Activate 
Selection.TypeText "Test" 
objEmbedded.OLEFormat.ConvertTo _ 
  ClassType:="Word.Picture"

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.