Listbox1 contains the names of sheets in the activeworkbook
which have been sorted by the user into the order they would
like them to appear in the workbook.

How can I use this to set the sheet order, please?

Regards.


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.588 / Virus Database: 372 - Release Date: 13/02/2004

Hi Stuart,

Try this

For i = 0 To ListBox1.ListCount - 1
Sheets(ListBox1.List(i)).Move befo=Sheets(i + 1)
Next



Regards,
Shah Shailesh
http://members.lycos.co.uk/shahweb/
(Excel Add-ins)

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

Many thanks, works fine.

Regards.

"Shailesh Shah" wrote in message
...
Hi Stuart,

Try this

For i = 0 To ListBox1.ListCount - 1
Sheets(ListBox1.List(i)).Move befo=Sheets(i + 1)
Next



Regards,
Shah Shailesh
http://members.lycos.co.uk/shahweb/
(Excel Add-ins)

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.592 / Virus Database: 375 - Release Date: 18/02/2004