variable sheet names in Journal

[Lilu2Go]

Hello @all!

I created a journal for exporting cgm files and execute this with run_journal.exe. Now, I have a problem with the names of the drawingsheets... sometimes they called "BLATT", or "DRAWING", or "SHT1". I couldn't find a solution to get this part varible for more than one name.

Dim drawingSheet1 As Drawings.DrawingSheet = CType(workPart.DrawingSheets.FindObject("BLATT"), Drawings.DrawingSheet)

Has anybody an idea? Thanks a lot!

 

[petulf]

Use the parts drawing sheets collector instead of .FindObject()

For Each sheet As NXOpen.Drawings.DrawingSheet In workPart.DrawingSheets
    MsgBox(sheet.Name)
Next

 

[Lilu2Go]

ok, it took a while, but eventuelly I got it working! Thank you!!!!