Help needed on Excluding Weekends

Hi All,

I need help to exclude Weekends when i run the macro.

Here the Code:

ActiveWorkbook.Worksheets.Add.Name = Format(Now() - 1, "mm-dd-yy")

Thanks in advance!!!

Regards

Elango