---

Hello guys

I've created a macro, which occasionally creates new sheets in the drawing, and gives them different names.

Is there a way to alphabetically sort those drawing sheets?

CATIA help file give me this clue:

Code:

---

Set drwsheetsorder =  CATIA.ActiveDocument.Part.GetItem("CATLayoutRoot")
Set drwsheets = drwsheetsorder.Sheets
Set sheet1 = drwsheets.item(1)
Set sheet2 = drwsheets.item(2)
newsheetorder = Array(sheet2, sheet1)
drwsheetsorder.reorder_Sheets(newsheetorder)

---

How can I sort my sheets collection, giving them apropriate Index in the array?

Regards

Lucas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Lucas
You can for example use the BubbleSort algorithm.
On the www you can find completed function for these.

Regrads,
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP