Compartilhar via


Método Selection.Rotate (Visio)

Gira formas selecionadas como um grupo ou individualmente sobre seus pinos.

Sintaxe

expression. Rotate( _Angle_ , _AngleUnitsNameOrCode_ , _BlastGuards_ , _RotationType_ , _PinX_ , _PinY_ , _PinUnitsNameOrCode_ )

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

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Ângulo Obrigatório Double Especifica o ângulo para girar a seleção. Consulte Comentários para valores possíveis.
AngleUnitsNameOrCode Opcional Variantes Especifica as unidades a serem usadas para Angle. Consulte Comentários para valores possíveis. O padrão é graus.
BlastGuards Opcional Boolean True para substituir fórmulas no ShapeSheet de qualquer uma das formas selecionadas às quais a função GUARD foi aplicada; False para deixar fórmulas protegidas inalteradas. O padrão é False.
RotationType Opcional VisRotationTypes Especifica como a seleção deve ser girada. Consulte comentários para os valores possíveis.
PinX Opcional Double Quando RotationType for visRotateSelectionWithPin , especifique a posição X do pino do qual a seleção deve ser girada.
Piny Opcional Double Quando RotationType for visRotateSelectionWithPin , especifique a posição Y do pino do qual a seleção deve ser girada.
PinUnitsNameOrCode Opcional Variantes Especifica as unidades a usar para PinX e PinY. Consulte Comentários para valores possíveis. O padrão é polegadas.

Valor de retorno

Nada

Comentários

Os valores possíveis a seguir para RotationType são declarados em VisRotationTypes na biblioteca de tipos do Visio.

Constant Valor Descrição
visRotateSelectionWithPin 1 Gira a seleção em torno de um pino.
visRotateSelection 0 Gira a seleção em relação ao centro da seleção.
visRotateShapes 2 Gira as formas selecionadas em torno de seus pinos em relação a seu ângulo atual.

Passar True para o argumento opcional BlastGuards substitui fórmulas no ShapeSheet de qualquer uma das formas selecionadas às quais a função GUARD foi aplicada.

O valor padrão para RotationType é visRotateSelection.

Você pode especificar AngleUnitsNameOrCode ou PinUnitsNameOrCode como um inteiro (um membro de VisUnitCodes) ou um valor de sequência de caracteres tal como "radianos" ou "polegadas". Se a sequência de texto for inválida ou o código da unidade for inapropriado (não textual), é gerado um erro.

Para obter uma lista completa de sequências de texto de unidades válidas juntamente com constantes de automação correspondentes (valores inteiros), consulte Sobre unidades de medida.

Exemplo

Esta macro do Microsoft Visual Basic for Applications (VBA) mostra como usar o método Rotate para girar uma seleção 45 graus em relação ao centro da seleção.

Public Sub Rotate_Example() 
 
 Dim vsoShape1 As Visio.Shape 
 Dim vsoShape2 As Visio.Shape 
 
 Set vsoShape1 = Application.ActiveWindow.Page.DrawRectangle(1, 9, 3, 7) 
 Set vsoShape2 = Application.ActiveWindow.Page.DrawRectangle(3, 6, 5, 5) 
 
 ActiveWindow.DeselectAll 
 
 ActiveWindow.Select vsoShape1, visSelect 
 ActiveWindow.Select vsoShape2, visSelect 
 
 Application.ActiveWindow.Selection.Rotate 45, visDegrees 
 
End Sub

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.