Dear Harmeet Singh,
It s working thanks a lot
On Tue, Jun 1, 2010 at 4:08 PM, Harmeet Singh wrote:
> *Here you go*
> *use mentioned code*
> *
> *
> *Sub ren()*
> *
> *
> *mo = InputBox("Enter Month number.")*
> *
> *
> *For i = 1 To Application.Worksheets.Count*
> *
> *
> *Sheets(i).
;
> *Jitendra Kr. Verma** ***
> --
>
> *From:* excel-macros@googlegroups.com [mailto:
> excel-mac...@googlegroups.com] *On Behalf Of *Venkatesan c
> *Sent:* Tuesday, June 01, 2010 3:07 PM
> *To:* Google
> *Subject:* $$Excel-Macros$$ Excel Sheet Renameing Macro Reqi
Hi All /
I feel that I am facing a similar problem in word.
My work relates to prepare a large number of reports and I use mail merge
for all this process. I have to save each and every report separately. The
file name I need to use is also generated through mail merge at the very
first line of e
End Sub
Regards,
Jitendra Kr. Verma
From: excel-macros@googlegroups.com [mailto:excel-mac...@googlegroups.com] On
Behalf Of Venkatesan c
Sent: Tuesday, June 01, 2010 3:07 PM
To: Google
Subject: $$Excel-Macros$$ Excel Sheet Renameing Macro Reqired
Dear Grou
*Here you go*
*use mentioned code*
*
*
*Sub ren()*
*
*
*mo = InputBox("Enter Month number.")*
*
*
*For i = 1 To Application.Worksheets.Count*
*
*
*Sheets(i).Name = Left(Sheets(i).Name, 3) & mo & Right(Sheets(i).Name,
3)*
*Next i*
*
*
*End Sub*
Warm Regards,
Harmeet Singh
http://www.fac
