It's an example.
cellList = Array("Cell-A", "Cell-B", "Cell-C")
Set cmpsColl = pcbDocObj.Components(epcbSelectPlaced, epcbCompAll, epcbCelltypeAll, "*")
For Each cmp In cmpsColl
For i = 0 To UBound(cellList)
If cmp.CellName = cellList(i) Then
'---- RefDes move process ----
Hi joseph-san, Your script was seen. What kind of issue does this script have? Satoru