To Fix Duplicate Part Numbers in I-deas Team Data Manager

Using miadmin... This script will help you.

1. Under the "Action" column use this formula.

=IF(X7=X8,"","MODIFY_PART_NUMBER")

This seperates out the same item_GUID from its seperate versions

2. Use this (or similar code) to add a six digit prefix to your part numbers.

Sub AddPartNumberandName()

NumRows = ActiveSheet.UsedRange.Rows.Count ' Counts rows in sheet

Number = 100000 ' Whatever unique item identifier you want.

x = 7 ' this is where miadmin spits out the data

Cells(1, 1).Select

For x = 7 To NumRows

Cells(x, 8).Select

If Cells(x, 9) <> "" Then Cells(x, 8).Select

ActiveCell.FormulaR1C1 = "test." & Number & Cells(x, 4).Value Number = Number + 1

Else

End If

Next x

Cells(1, 1).Select

End Sub