"flyingdoc" wrote:
.. make a worksheet name equal a specific cell on the worksheet
To add-on a little for the above part ..
Try the sub below (paste in general module)
on a *back-up* copy of your file:
It loops through all worksheets (assumed identical structure)
and renames each sheet with what's in C2 [of each sheet], all at one go.
(It's assumed C2 will hold for example, text - different for each sheet,
and with no illegal characters, etc)
Sub RenameWS()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Activate
ws.Name = Range("C2").Value
Next
End Sub
Adapt the cell "C2" to suit ..
--
Rgds
Max
xl 97
---
GMT+8, 1° 22' N 103° 45' E
xdemechanik <atyahoo<dotcom
----
|