I am attempting to add a date to a file name. I want the first file to end with
30-june-07, and each file going forward to end with the end of the month. I keep receiving the 'Invalid procedure call ir argument' error. Here is my code:

Code:
Sheets("Portfolio").Select
    Sheets("Portfolio").Copy
    ChDir "P:\Conduits\Servicing\Port Stats\Allied\Archive\Portfolio"
    ActiveWorkbook.SaveAs
...