Find Size of IDW File

[isocam]

Can anybody help??

Using Inventors VBA, is it possible to get the sheet size of a idw drawing file (Eg A0, A1, A2 etc)

Many thanks in advance!!!

[Anonymous · Accepted solution]

Private Sub Sample()
    Dim oDrawDoc As DrawingDocument
    Set oDrawDoc = ThisApplication.ActiveDocument
    Dim oSheet As Sheet
    For Each oSheet In oDrawDoc.Sheets
        MsgBox (oSheet.Size)
    Next
End Sub