図面内のすべての用紙、部分図を列挙する

// 図面内のすべての用紙、部分図を列挙
Document doc = ActiveDocument;
DrawingCollection drawings = doc.Drawings;
 
foreach (Drawing drawing in drawings)
{
    string name = drawing.Name;
    ShapeState state = drawing.State;
 
    // 用紙の場合
    if (drawing is Paper)
    {
        PaperType paperType = ((Paper)drawing).PaperType;
        double height = ((Paper)drawing).PaperHeight ;
        double width = ((Paper)drawing).PaperWidth;
        bool landscape = ((Paper)drawing).Landscape;
 
        // 用紙内の部分図レイアウトを列挙
        LayoutCollection layouts = drawing.Layouts;
        foreach (Layout layout in layouts)
        {
            string layoutName = layout.Name;
            Point2d origin = layout.Origin;
            double scaleX = layout.ScaleX;
            double scaleY = layout.ScaleY;
            double angle = layout.Angle;
        }
    }
}