Nota
O acesso a esta página requer autorização. Podes tentar iniciar sessão ou mudar de diretório.
O acesso a esta página requer autorização. Podes tentar mudar de diretório.
Abre o objeto OLE especificado para editar o aplicativo no qual foi criado.
Sintaxe
expressão. Editar
expressão Obrigatório. Uma variável que representa um objeto "Comentário".
Exemplo
Este exemplo abre (para edição) o primeiro objeto OLE incorporado (definido como uma forma) no documento ativo.
Dim shapesAll As Shapes
Set shapesAll = ActiveDocument.Shapes
If shapesAll.Count >= 1 Then
If shapesAll(1).Type = msoEmbeddedOLEObject Then
shapesAll(1).OLEFormat.Edit
End If
End If
Este exemplo abre (para edição) o primeiro objeto OLE vinculado (definido como uma forma embutida) no documento ativo.
Dim colIS As InlineShapes
Set colIS = ActiveDocument.InlineShapes
If colIS.Count >= 1 Then
If colIS(1).Type = wdInlineShapeLinkedOLEObject Then
colIS(1).OLEFormat.Edit
End If
End If
Confira também
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.