Posted to microsoft.public.excel.worksheet.functions

Mike H

external usenet poster

Posts: 11,501

How can I rearrange worksheets?

Hi,

Right click a sheet tab, view code and paste this 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

"trishk" wrote:

I'd like to rearrange worksheets within a workbook so that they appear in
alphabetical order.

Reply With Quote

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

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
rearrange date	tuanvcb	Excel Discussion (Misc queries)	1	February 13th 08 05:08 PM
rearrange text	JJ	Excel Worksheet Functions	1	May 3rd 06 06:35 PM
Rearrange a formula	Ali Baba	Charts and Charting in Excel	3	September 5th 05 02:50 PM
rearrange data by day	Adent	Excel Discussion (Misc queries)	4	July 31st 05 09:26 PM
Function to Rearrange Name	Karen	Excel Worksheet Functions	3	May 12th 05 06:22 PM

All times are GMT +1. The time now is 08:35 AM.

About Us

"It's about Microsoft Excel"

Menu

About Us