Specifies the rotation angle for the layout or plot configuration.
Supported platforms: Windows only
VBA:
object.PlotRotation
Type: Layout, PlotConfiguration
The objects this property applies to.
Read-only: No
Type: acPlotRotation enum
The rotation angle is relative to the X axis of the object's WCS with positive angles going counterclockwise when looking down from the Z axis toward the origin.
Changes to this property will not be visible until after a regeneration of the drawing. Use the Regen method to regenerate the drawing.
VBA:
Sub Example_PlotRotation()
' This example reads and modifies the PlotRotation
' Layout value.
' When finished, this example resets the value back to
' its original value.
Dim ACADLayout As ACADLayout
Dim originalValue As Integer
' Get the layout object
Set ACADLayout = ThisDrawing.ActiveLayout
' Read and display the original value
originalValue = ACADLayout.PlotRotation
MsgBox "The PlotRotation value is set to: " & originalValue
' Modify the PlotRotation preference by toggling the value
ACADLayout.PlotRotation = ac180degrees
MsgBox "The PlotRotation preference has been set to: " & ACADLayout.PlotRotation
' Reset the preference back to its original value
ACADLayout.PlotRotation = originalValue
MsgBox "The PlotRotation preference was reset back to: " & originalValue
End Sub
Visual LISP:
(vl-load-com)
(defun c:Example_PlotRotation()
;; This example reads and modifies the PlotRotation
;; Layout value.
;; When finished, this example resets the value back to
;; its original value.
(setq acadObj (vlax-get-acad-object))
(setq doc (vla-get-ActiveDocument acadObj))
;; Get the layout object
(setq ACADLayout (vla-get-ActiveLayout doc))
;; Read and display the original value
(setq originalValue (vla-get-PlotRotation ACADLayout))
(alert (strcat "The PlotRotation value is set to: " (itoa originalValue)))
;; Modify the PlotRotation preference by toggling the value
(vla-put-PlotRotation ACADLayout ac180degrees)
(alert (strcat "The PlotRotation preference has been set to: " (itoa (vla-get-PlotRotation ACADLayout))))
;; Reset the preference back to its original value
(vla-put-PlotRotation ACADLayout originalValue)
(alert (strcat "The PlotRotation preference was reset back to: " (itoa originalValue)))
)