Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
CH CH is offline
external usenet poster
 
Posts: 49
Default Is there a way to put worksheets in alphabetical sequence?

I have a group of procedures costs that I am entering into excel as I work
them up. Each worksheet bears the name of the procedure. I would like to be
able to alphabetize the worksheets.
  #2   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 11,501
Default Is there a way to put worksheets in alphabetical sequence?

Hi,

Right click any worksheet tab, view code and paste the code below in and run
it

Sub Sortem()
For X = 1 To Worksheets.Count
For y = X To Worksheets.Count
If UCase(Sheets(y).Name) < UCase(Sheets(X).Name) Then
Sheets(y).Move Befo=Sheets(X)
End If
Next
Next
End Sub

Mike

"CH" wrote:

I have a group of procedures costs that I am entering into excel as I work
them up. Each worksheet bears the name of the procedure. I would like to be
able to alphabetize the worksheets.

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
How to arrange worksheets in alphabetical order? Rohit Rathi Excel Worksheet Functions 2 July 11th 09 01:24 PM
How to put worksheets in Alphabetical order? LiveUser Excel Discussion (Misc queries) 6 January 16th 08 03:45 PM
Worksheets alphabetical? Berteke Excel Discussion (Misc queries) 1 July 20th 07 12:57 PM
How do I put worksheets in alphabetical order DLee New Users to Excel 2 July 27th 05 09:16 PM
How do I put worksheets in alphabetical order DLee Excel Worksheet Functions 1 July 27th 05 08:41 PM


All times are GMT +1. The time now is 01:12 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"