Use this code to make sheets in order.
Sub sheetorder()
Dim i As Integer, j As Integer, x As Integer
x = Sheets.Count
On Error GoTo Errortrap:
For i = 1 To x - 1
For j = 1 To x
If Sheets(j).Name < Sheets(i).Name Then
Sheets(j).Move Before:=Sheets(i)
End If
Next
Next
Sheets(1).Select
Errortrap:
End
er 28, 2008 12:16 PM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Re: excel sheets in ascending Order
Please install power utility which is attached herewith. It will solve
your current as well as many other problems.
Tools>Add-in>browse>
_
Hi Sanjay,
Check out these links. It would help you.
http://www.cpearson.com/excel/sortws.aspx
http://exceltip.com/st/Sorting_Sheets_in_Ascending_Order/669.html
Regards,
Lohith
On 27 Nov, 23:13, "Sanjaykumar Bhola" <[EMAIL PROTECTED]> wrote:
> Hi Friends,
>
> Can anyone advise me, how can I ar