Sub Renamesheets()
dim sh as Worksheet
for each sh in workbook.Worksheets
sh.name = sh.Range("C4").Value
Next
end Sub
would be my guess of what you want
--
Regards,
Tom Ogilvy
"vumian" wrote:
I have a file that i do not know how many sheet are there in before
i need to copy contain of C4 to name of sheets
Thank for your help.
--
vumian
------------------------------------------------------------------------
vumian's Profile: http://www.excelforum.com/member.php...o&userid=36494
View this thread: http://www.excelforum.com/showthread...hreadid=564787