How can I rearrange worksheets?   

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

date: Wed, 20 Aug 2008 05:36:01 -0700   author:   trishk

Re: How can I rearrange worksheets?   

See http://www.cpearson.com/excel/sortws.aspx

-- 
__________________________________
HTH

Bob

"trishk"  wrote in message 
news:2424A9B7-52C7-4249-B39F-A3C6A8EAD1D2@microsoft.com...
> I'd like to rearrange worksheets within a workbook so that they appear in
> alphabetical order.

date: Wed, 20 Aug 2008 14:00:45 +0100   author:   Bob Phillips

RE: 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 Before:=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.

date: Wed, 20 Aug 2008 06:07:01 -0700   author:   Mike H