more partlists on 1 idw

[Anonymous]

Hi,

I was wondering if you can place two or more different partslist on 1 drawing and get the right balloons without hand overwrite. 

Situation that i face: 

- I have an boat with 4 engines and i show them in 1 drawing.

- For each engine i want to make an own partlist (every engine has its own iam) with his own number.

- First engine starting with parts 100 seconde engine 200 etc...

- In an later stadium every engine get his own drawing.

- For engine 1 and engine 2 there are some parts that are the same, but this parts has another number then engine 1 since i start with the 100 series etc. 

Does some have an solutions for this? Thanks!

[JelteDeJong]

Can you this:

Dim doc As DrawingDocument = ThisDoc.Document
Dim plNr As Integer = 0
For Each sheet As Sheet In doc.Sheets
    plNr = plNr + 1
    For Each partList As PartsList In Sheet.PartsLists

        Dim itemColNr As Integer = -1
        For i = 1 To partList.PartsListColumns.Count
            Dim col As PartsListColumn = partList.PartsListColumns.Item(i)
            If col.PropertyType = PropertyTypeEnum.kItemPartsListProperty Then
                itemColNr = i
            End If
        Next

        For i = 1 To partList.PartsListRows.Count
            Dim row As PartsListRow = partList.PartsListRows.Item(i)
            Dim itemCell As PartsListCell = row.Item(itemColNr)
            itemCell.Value = plNr * 100 + i
        Next
    Next
Next