Compartilhar via

Método Shape.MoveIntoTextFlow (Publisher)

  • Artigo

Move uma determinada forma para o fluxo de texto definido pelo objeto TextRange . A forma é sempre inserida embutida no início do fluxo de texto.

Sintaxe

expressão. MoveIntoTextFlow (Intervalo)

Expressão Uma variável que representa um objeto Shape .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Range Obrigatório TextRange O intervalo de texto antes do qual a forma indicada será inserida.

Valor de retorno

Nada

Comentários

O método MoveIntoTextFlow falhará se a forma a ser movida já estiver embutida ou se não for um tipo de forma embutida válido. Os tipos de forma embutida inválidos incluem:

  • Formas embutidas
  • Formas agrupadas
  • Fragmentos de HTML
  • Objetos inteligentes
  • Caixas de texto encadeadas

Exemplo

O exemplo a seguir verifica se a segunda forma na segunda página da publicação está embutida e, se não estiver, ele a embute no início do fluxo de texto do intervalo de texto indicado.

Dim theShape As Shape 
Dim theRange As TextRange 
 
Set theRange = ActiveDocument.Pages(2).Shapes(1).TextFrame.TextRange 
Set theShape = ActiveDocument.Pages(2).Shapes(2) 
 
If Not theShape.IsInline = msoTrue Then 
 theShape.MoveIntoTextFlow Range:=theRange 
End If

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.