Macro to rename worksheets

[tanktata]

Hello,

Is there any way to have a macro create and rename worksheets so that there is one worksheet for each weekday (monday to friday).

So for example, in december, it would create 21 worksheets for each weekday, each with the worksheet name showing the weekday it relates to.
1 Dec 2006, 4 Dec 2006, and so on.

Is this possible?

Taking it a step further, could it be tweaked so that Bank Holidays are excluded, such as christmas day and boxing day?

[MSP77079]

Try this ...

Please Login or Register  to view this content.

[tanktata]

Tried that.

I get a runtime error '1004'

Says;

Method 'Add' of object 'Sheets' Failed


It fails at this line;


Set ws = ThisWorkbook.Worksheets.Add(after:= _
ThisWorkbook.Worksheets.Count)


Does the first sheet have to be named something in particular to make it work?

[Bryan Hessey]

Tried that.

I get a runtime error '1004'

Says;

Method 'Add' of object 'Sheets' Failed

It fails at this line;

Set ws = ThisWorkbook.Worksheets.Add(after:= _
ThisWorkbook.Worksheets.Count)

Does the first sheet have to be named something in particular to make it work?

Hi,,

in place of

Please Login or Register  to view this content.

try

Please Login or Register  to view this content.

and the sheets add as required.

hth
---

[tanktata]

That works, thanks a lot