Método ShapeRange.Align (Publisher)
Alinha todas as formas no objeto ShapeRange especificado.
Sintaxe
expressão. Alinhar (AlignCmd, RelativeTo)
Expressão Uma variável que representa um objeto ShapeRange .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| AlignCmd | Obrigatório | MsoAlignCmd | Especifica como as formas devem ser alinhadas. |
| RelativeTo | Obrigatório | MsoTriState | Especifica se as formas são alinhadas em relação à página ou umas às outras. |
Comentários
O parâmetro AlignCmd pode ser uma das constantes MsoAlignCmd declaradas na biblioteca de tipos do Microsoft Office e mostradas na tabela a seguir.
| Constante | Descrição |
|---|---|
| msoAlignBottoms | Alinha formas ao longo de suas bordas inferiores. Se RelativeTo for msoFalse, a forma mais inferior determinará a linha na qual as outras formas estão alinhadas. |
| msoAlignCenters | Alinha formas em uma linha vertical através de seus centros. Se RelativeTo for msoFalse, as formas serão alinhadas em uma linha no meio do caminho entre as formas mais à esquerda e à direita. |
| msoAlignLefts | Alinha formas ao longo de suas bordas à esquerda. Se RelativeTo for msoFalse, a forma mais à esquerda determinará a linha na qual as outras formas estão alinhadas. |
| msoAlignMiddles | Alinha formas em uma linha horizontal através de seus centros. Se RelativeTo for msoFalse, as formas serão alinhadas em uma linha no meio do caminho entre as formas superior e inferior. |
| msoAlignRights | msoAlignRights Alinha formas ao longo de suas bordas à direita. Se RelativeTo for msoFalse, a forma mais à direita determinará a linha na qual as outras formas estão alinhadas. |
| msoAlignTops | Alinha formas ao longo de suas bordas superiores. Se RelativeTo for msoFalse, a forma mais superior determinará a linha na qual as outras formas estão alinhadas. |
O parâmetro RelativeTo pode ser uma das constantes MsoTriState .
| Constante | Descrição |
|---|---|
| msoFalse | Alinha formas em relação umas às outras. |
| msoTrue | Alinha formas em relação à página. |
Se o parâmetro RelativeTo for msoFalse e o intervalo de formas contiver apenas uma forma, ocorrerá um erro.
Exemplo
O exemplo a seguir alinha todas as formas na primeira página da publicação ativa em uma linha vertical através de seus centros.
ActiveDocument.Pages(1).Shapes.Range.Align _
AlignCmd:=msoAlignCenters, _
RelativeTo:=msoTrue
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.