Posted to microsoft.public.excel.programming

external usenet poster

Posts: 72

Rename Tab

Hi Everyone,
By pressing one button I am trying to print out the timesheet, copy and save
as a new sheet and then rename the tab from the formula in cell A81. It is
hanging at ActiveSheet.Name = Range("A81").Value. Any suggestions would be
appreciated.

Sheets("Timesheet").Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1
ActiveSheet.Copy after:=ActiveSheet
ActiveSheet.Name = Range("A81").Value
Sheets("Timesheet").Select
--
Kerry

Reply With Quote

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Posting Rules
Smilies are On [IMG] code is On HTML code is Off Trackbacks are On Pingbacks are On Refbacks are On

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
rename	Martin ©¿©¬ @nohere.net	Excel Discussion (Misc queries)	14	March 26th 10 05:54 PM
how do i rename a sheet if the rename tab is inactive?	Nelson	Excel Worksheet Functions	1	March 3rd 10 10:28 AM
Rename a cell	WLMPilot	Excel Discussion (Misc queries)	1	August 4th 06 08:03 PM
Rename Add-Ins	BEEJAY	Excel Discussion (Misc queries)	4	December 8th 05 08:18 PM
Rename a sub	ArthurJ[_2_]	Excel Programming	2	July 18th 03 06:21 PM

All times are GMT +1. The time now is 01:15 AM.

About Us

"It's about Microsoft Excel"

Menu

About Us