Do loop to add a new worksheet

A

Alex

If anyone could help on this...

Stuck on how to do a LOOP to add a new worksheet to the front of a workbook
with unkown amount of worksheets.

I get about as far as:

Dim WrkBk as Integer

WrkBk = ActiveWorkbook.Worksheets.Count

THANKS
 
C

Chip Pearson

Alex,

No loop is required. Try something like

With ActiveWorkbook.Worksheets
.Add before:=.Item(1)
End With


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
 
A

Alex

PERFECT...THANKS!!!



Chip Pearson said:
Alex,

No loop is required. Try something like

With ActiveWorkbook.Worksheets
.Add before:=.Item(1)
End With


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
 
Top