ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   worksheet name (https://www.excelbanter.com/excel-programming/309401-worksheet-name.html)

Tucson Guy

worksheet name
 
How can I enter the worksheet name in a cell on the worksheet without haveing
to type it in?

Chip Pearson

worksheet name
 
You can use a formula like the following:

=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,32)

Leave the "filename" intact as shown. Do NOT replace it with the
actual filename.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Tucson Guy" <Tucson wrote in
message
...
How can I enter the worksheet name in a cell on the worksheet
without haveing
to type it in?




JE McGimpsey

worksheet name
 
Take a look he

http://www.mcgimpsey.com/excel/formu..._function.html



In article ,
"Tucson Guy" <Tucson wrote:

How can I enter the worksheet name in a cell on the worksheet without haveing
to type it in?


Gord Dibben

worksheet name
 
Copy/paste this code to a General Module in your workbook.

Function SheetName(Optional ByVal rng As Range) As String
If rng Is Nothing Then Set rng = Application.Caller
SheetName = rng.Parent.Name
End Function

Sub Test()
ActiveCell.FormulaR1C1 = "=SheetName()"
End Sub

Assign Sub Test() to a button or shortcut key combo.

Gord Dibben Excel MVP


On Wed, 8 Sep 2004 16:03:02 -0700, "Tucson Guy" <Tucson
wrote:

How can I enter the worksheet name in a cell on the worksheet without haveing
to type it in?



SidBord

worksheet name
 
You can write a one-line Visual Basic macro.
I called mine "SheetName".
Try this:
Function SheetName() As String
SheetName = Range("A1").Parent.Name
End Function

-----Original Message-----
How can I enter the worksheet name in a cell on the

worksheet without haveing
to type it in?
.



All times are GMT +1. The time now is 05:26 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com