[TOJluK]

Вот такой вот макрос excel выдает:

Код:

    ActiveWorkbook.saveas Filename:= _"с:\Book1.xls", _
        FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False

Дальше разберетесь?