Got any Excel/VBA Questions? Free Excel Help
These two UDF's will place the name of a Workbook into a cell, or the Workbooks File path and name. It also shows the Excel CELL function returning the Workbooks name, file path and active sheet name. Neither of the first two examples take any arguments. The last one is used in place of nesting the MID and other functions with the CELL function to get the sheet name.
Function MyName() As String MyName = ThisWorkbook.Name End Function
Function MyFullName() As String MyFullName = ThisWorkbook.FullName End Function
Function SheetName(rAnyCell) Application.Volatile SheetName = rAnyCell.Parent.Name End Function
To use this UDF push Alt+F11 and go Insert>Module and paste in the code. Push Alt+Q and save. The Function will appear under "User Defined" in the Paste Function (Shift+F3).
Use the Functions as shown in the graphic example below. They takes no arguments.
The CELL Function is a standard function that will return information about the current operating system. See CELL is Excels help for details.
Formula |
Result |
=MyName() |
Workbook Path.xls |
=MyFullName() |
C:\OzGrid\Learning\Workbook Path.xls |
=CELL("filename") |
C:\OzGrid\Learning\[Workbook Path.xls]Sheet1 |
=sheetname(A1) |
Sheet1 |
See also:
Index to Excel VBA Code |
Index to Excel Freebies |
Index to Excel Freebies |
Excel Visual Basic Editor Environment Tips & Tricks |
Vlookup Across Excel Worksheets |
See also Index to Excel VBA Code and Index to Excel Freebies and Lesson 1 - Excel Fundamentals and Index to how to… providing a range of solutions.
Click here to visit our Free 24/7 Excel/VBA Help Forum where there are thousands of posts you can get information from, or you can join the Forum and post your own questions.