Re: $$Excel-Macros$$ Insert work sheet and rename when insert.

2010-09-07 Thread Wilfredo_Burgos
so notify the sender and delete the material from any media and destroy any printouts or copies. siti Vi Sent by: excel-macros@googlegroups.com 09/04/2010 03:40 AM Please respond to excel-macros@googlegroups.com To excel-macros@googlegroups.com cc Subject Re: $$Excel-Macros$$ Insert work

Re: $$Excel-Macros$$ Insert work sheet and rename when insert.

2010-09-06 Thread anandydr
The code will surely insert sheets after the last sheet in the workbook, but what if we want to insert sheets before any particular sheet ? let's say before active sheet or the fourth sheet. What should be written instead of Sheets.Add after:=Sheets(Sheets.Count) ??? On Sep 4, 12:40 pm, siti Vi w

Re: $$Excel-Macros$$ Insert work sheet and rename when insert.

2010-09-04 Thread siti Vi
Sub CreateMoreSheets() '-- by siti Vi / Jakarta, Sept 4, 2010 Dim shtArr Dim i As Integer shtArr = InputBox("Type the Sheet's Name, separate by comma (,)") shtArr = Split(shtArr, ",") For i = 0 To UBound(shtArr) Sheets.Add after:=Sheets(Sheets.Count) ActiveSheet.Name =