Thread: Worksheet names
View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default Worksheet names

Store Jerry's macro and others you create and copy in your Personal.xls file
so's they are available for all open workbooks.

See help for more on Personal Macro Workbook.


Gord Dibben MS Excel MVP

On Thu, 17 May 2007 20:15:01 -0700, johnston
wrote:

This worked fantastically well. Thank you!

Is there a way to make this available in all my workbooks?

"JLatham" wrote:

Choose an empty sheet in the workbook and run this code:

Sub ListSheetNames()
Dim anySheet As Worksheet

Range("A1").Select
For Each anySheet in Worksheets
ActiveCell = anySheet.Name
ActiveCell.Offset(1, 0).Activate
Next
End Sub

To put the code where you can use it, press [Alt]+[F11] then choose Insert |
Module from the VB Editor menu. Cut and paste that code into the module and
then close the VB Editor and use Tools | Macro | Macros to choose and [Run]
the code.

"johnston" wrote:

How can I generate a list of the names of the worksheets in a workbook so
that I can write a brief description of what each does?