| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
macro to change tab name to file name
I need a macro to change the name of a tab to the name of the Excel file.
Here's what I've got (the original name of the tab is "compliled"). It doesn't work: Sheets("compiled").Select Sheets("compiled").Name = Filename Thanks |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
macro to change tab name to file name
Is Filename a variable? if so, it works fine. Make sure there are no invalid
characters such as / -- --- HTH Bob (there's no email, no snail mail, but somewhere should be gmail in my addy) "jeremy nickels" wrote in message ... I need a macro to change the name of a tab to the name of the Excel file. Here's what I've got (the original name of the tab is "compliled"). It doesn't work: Sheets("compiled").Select Sheets("compiled").Name = Filename Thanks |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
macro to change tab name to file name
Like Bob said, if Filename is a variable holding the filename, then it
works fine. Filename=ActiveWorkbook.Name Sheets("compiled").Name = Filename or Sheets("compiled").Name = ActiveWorkbook.Name jeremy nickels wrote: I need a macro to change the name of a tab to the name of the Excel file. Here's what I've got (the original name of the tab is "compliled"). It doesn't work: Sheets("compiled").Select Sheets("compiled").Name = Filename Thanks |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
macro to change tab name to file name
Thanks.
How do I keep the tab name from becoming "somefilename.xls"? I need to leave the .xls off so that the tab name becomes just "somefilename". "JW" wrote: Like Bob said, if Filename is a variable holding the filename, then it works fine. Filename=ActiveWorkbook.Name Sheets("compiled").Name = Filename or Sheets("compiled").Name = ActiveWorkbook.Name jeremy nickels wrote: I need a macro to change the name of a tab to the name of the Excel file. Here's what I've got (the original name of the tab is "compliled"). It doesn't work: Sheets("compiled").Select Sheets("compiled").Name = Filename Thanks |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
macro to change tab name to file name
On Nov 12, 9:07 pm, jeremy nickels
wrote: Thanks. How do I keep the tab name from becoming "somefilename.xls"? I need to leave the .xls off so that the tab name becomes just "somefilename". "JW" wrote: Like Bob said, if Filename is a variable holding the filename, then it works fine. Filename=ActiveWorkbook.Name Sheets("compiled").Name = Filename or Sheets("compiled").Name = ActiveWorkbook.Name jeremy nickels wrote: I need a macro to change the name of a tab to the name of the Excel file. Here's what I've got (the original name of the tab is "compliled"). It doesn't work: Sheets("compiled").Select Sheets("compiled").Name = Filename Thanks Could do something like this, but it is assuming that the extension will always be 4 characters, which will most likely work for what you need. Sheets("compiled").Name = _ Left(ActiveWorkbook.Name, _ Len(ActiveWorkbook.Name) - 4) |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
macro to change tab name to file name
Thanks JW. That was exactly what I needed.
"JW" wrote: On Nov 12, 9:07 pm, jeremy nickels wrote: Thanks. How do I keep the tab name from becoming "somefilename.xls"? I need to leave the .xls off so that the tab name becomes just "somefilename". "JW" wrote: Like Bob said, if Filename is a variable holding the filename, then it works fine. Filename=ActiveWorkbook.Name Sheets("compiled").Name = Filename or Sheets("compiled").Name = ActiveWorkbook.Name jeremy nickels wrote: I need a macro to change the name of a tab to the name of the Excel file. Here's what I've got (the original name of the tab is "compliled"). It doesn't work: Sheets("compiled").Select Sheets("compiled").Name = Filename Thanks Could do something like this, but it is assuming that the extension will always be 4 characters, which will most likely work for what you need. Sheets("compiled").Name = _ Left(ActiveWorkbook.Name, _ Len(ActiveWorkbook.Name) - 4) |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Recording macro to save file with name change | Excel Programming | |||
| a macro that will change the file names within it after running | Excel Programming | |||
| Macro to change file name in Vlookup formula | Excel Programming | |||
| Change Code in Macro to specify file/folder to look in. | Excel Programming | |||
| macro code to change file-opening password | Excel Programming | |||
Linear Mode
