Community
Hi
i'm wandering if there is iLogic or vba code to change item numbers into letters in part list table. Our customer require letters and change one by one is kind pain.
Thanks for any advice
Solved! Go to Solution.
Hi
the code is not finish but give you a good idea š
Dim oDrawDoc As DrawingDocument oDrawDoc = ThisApplication.ActiveDocument ' Set a reference to the first parts list on the active sheet. ' This assumes that a parts list is on the active sheet. Dim oPartList As PartsList oPartList = oDrawDoc.ActiveSheet.PartsLists.Item(1) ' Iterate through the contents of the parts list. Dim i As Long For i = 1 To oPartList.PartsListRows.Count 'look at only the part number column oCell = oPartList.PartsListRows.Item(i).Item("ITEM") 'find a specific part number If oCell.Value = "1" Then oCell.Value = "A" End If Next