[mso] Re: Excel
- From: Wilson Baptista Junior <wilson@xxxxxxxxxx>
- To: mso@xxxxxxxxxxxxx
- Date: Fri, 20 Dec 2002 09:35:22 -0200
Hi Linda,
At 23:06 19/12/02 -0500, Linda F. Johnson wrote:
>If it IS possible to write a macro to alphabetize sheet tabs (which I kinda
>doubt), you might find someone who can do it in the Microsoft Excel
>Newsgroups....or the VBA newsgroups...or a yahoo group that is specifically
>for Excel or VBA.
It's possible, and it's not difficult. Below is a sample VBA macro
contributed to the EXCEL-L list by Ture Magnusson, Microsoft MVP - Excel.
I haven't tested it myself, but I'm sure it must work.
Best,
Wilson
Here is a small procedure that will sort the worksheets.
Sub SortWorkSheets()
Dim Ws As Integer
Dim SortAgain As Boolean
If Worksheets.Count = 0 Then Exit Sub
Do
SortAgain = False
For Ws = 1 To Worksheets.Count - 1
If Worksheets(Ws).Name > Worksheets(Ws + 1).Name Then
Worksheets(Ws + 1).Move Before:=Worksheets(Ws)
SortAgain = True
End If
Next Ws
Loop While SortAgain = True
End Sub
*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or
MicrosoftOffice@xxxxxxxxxxxxxxxx
To send mail to the group, simply address it to mso@xxxxxxxxxxxxx
To Unsubscribe from this group, send an email to
mso-request@xxxxxxxxxxxxx?Subject=unsubscribe
Or, visit the group's homepage and use the dropdown menu. This will also allow
you to change your email settings to digest or vacation (no mail).
//www.freelists.org/webpage/mso
To be able to use the files section for sharing files with the group, send a
request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation with
instructions. Once you are a member of the files group, you can go here to
upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************
Other related posts:
