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))) )