Automate Excel tabname

caholmes · #1 12-08-2008, 02:57 AM

Follow these instructions Deegz.

Go into the Visual Basic Editor (Alt + F11)
Ensure the Projects Window is Visible: View >> Project Explorer or Ctrl + R
Double click on the worksheet that you are trying to rename
Select worksheet from the dropdown box where it currently says (General)
In the second dropdown list (to the right of the first one) select 'SelectionChange'
Paste in the following code (exclude the link at the bottom). I hope this helps you.

On Error GoTo EH

If Range("C53") = "" Then Exit Sub

If ActiveSheet.Name <> Range("C53") Then ActiveSheet.Name = Range("C53")
Exit Sub
EH:
MsgBox "The value is cell C53 has created an error" & vbCr & vbCr & "Description: " & Err.Description

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Opening multiple Excel files within the same Excel window.	lost9471	Excel	2	05-01-2010 01:57 PM
How do I use an Excel form to populate and Excel spreadsheet	apostht	Excel	0	05-21-2006 11:17 AM