Propiedad Shape.Rotation (Publisher)

Devuelve o establece un valor single que representa el número de grados que gira la forma especificada alrededor del eje z. Un valor positivo indica un giro hacia la derecha; un valor negativo indica un giro hacia la izquierda. Lectura y escritura.

Sintaxis

expresión. Rotación

expresión Variable que representa un objeto Shape.

Observaciones

Para establecer la rotación de una forma tridimensional alrededor del eje X o del eje Y, use la propiedad RotationX o la propiedad RotationY del objeto ThreeDFormat .

Ejemplo

En este ejemplo se ajusta el giro de todas las formas de la primera página de la publicación activa con el giro de la primera forma. En este ejemplo se supone que hay al menos dos formas en la primera página de la publicación activa.

Sub SetShapeRotation() 
 Dim sngRotation As Single 
 Dim intCount As Integer 
 With ActiveDocument.Pages(1).Shapes 
 sngRotation = .Item(1).Rotation 
 For intCount = 1 To .Count 
 .Item(intCount).Rotation = sngRotation 
 Next intCount 
 End With 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.