Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Sorting the order of sheets by the name
Hi Is there a way to sort the order of the sheet, depending on the name of the sheets? i.e. I have several workbooks with names like "Sch 13", "Sch 8A" and "Sch 8B". I would like a way to sort these by name or the number they contain. Thanks -- Ctech ------------------------------------------------------------------------ Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745 View this thread: http://www.excelforum.com/showthread...hreadid=488136 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Sorting the order of sheets by the name
Hi Ctech,
Try Chip Pearson's procedu '============== Sub SortWorksheets() 'Chip Pearson Dim N As Integer Dim M As Integer Dim FirstWSToSort As Integer Dim LastWSToSort As Integer Dim SortDescending As Boolean SortDescending = False If ActiveWindow.SelectedSheets.Count = 1 Then FirstWSToSort = 1 LastWSToSort = Worksheets.Count Else With ActiveWindow.SelectedSheets For N = 2 To .Count If .Item(N - 1).Index < .Item(N).Index - 1 Then MsgBox "You cannot sort non-adjacent sheets" Exit Sub End If Next N FirstWSToSort = .Item(1).Index LastWSToSort = .Item(.Count).Index End With End If For M = FirstWSToSort To LastWSToSort For N = M To LastWSToSort If SortDescending = True Then If UCase(Worksheets(N).Name) _ UCase(Worksheets(M).Name) Then Worksheets(N).Move Befo=Worksheets(M) End If Else If UCase(Worksheets(N).Name) < _ UCase(Worksheets(M).Name) Then Worksheets(N).Move Befo=Worksheets(M) End If End If Next N Next M End Sub '<<============== -- --- Regards, Norman "Ctech" wrote in message ... Hi Is there a way to sort the order of the sheet, depending on the name of the sheets? i.e. I have several workbooks with names like "Sch 13", "Sch 8A" and "Sch 8B". I would like a way to sort these by name or the number they contain. Thanks -- Ctech ------------------------------------------------------------------------ Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745 View this thread: http://www.excelforum.com/showthread...hreadid=488136 |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Sorting the order of sheets by the name
Hi Ctech,
I should have additionally suggested that you visit Chip Pearson's Sorting Worksheets page for additional information and material. --- Regards, Norman "Ctech" wrote in message ... Hi Is there a way to sort the order of the sheet, depending on the name of the sheets? i.e. I have several workbooks with names like "Sch 13", "Sch 8A" and "Sch 8B". I would like a way to sort these by name or the number they contain. Thanks -- Ctech ------------------------------------------------------------------------ Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745 View this thread: http://www.excelforum.com/showthread...hreadid=488136 |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Sorting the order of sheets by the name
Do you have a link? -- Ctech ------------------------------------------------------------------------ Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745 View this thread: http://www.excelforum.com/showthread...hreadid=488136 |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Sorting the order of sheets by the name
Hi Ctech,
My apologies - I noticed the missing link and was sure that I included it in a follow-up post. The link is: http://www.cpearson.com/excel/sortws.htm --- Regards, Norman "Ctech" wrote in message ... Do you have a link? -- Ctech ------------------------------------------------------------------------ Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745 View this thread: http://www.excelforum.com/showthread...hreadid=488136 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel Sorting Order | Excel Discussion (Misc queries) | |||
Customized Sorting Order | New Users to Excel | |||
sorting data in order | Excel Worksheet Functions | |||
sorting in order | Excel Worksheet Functions | |||
sorting in order | Excel Worksheet Functions |