Создать имя файла, соответствующее ячейке - VBA

Формулировка задачи:

Здравствуйте! Задача следующая: в Книге excel есть ячейка, в которой данные постоянно меняются в зависимости от запроса. Необходимо создавать каждый раз новый файл excel с отчетом (не важно каким), где в имени файла будет значение этой исходной ячейки. Долго бьюсь над этой проблемой, так и не смог решить

уточнение: в одной из ячеек в новой книге также будет значение этой ячейки. т.е. задача сводится к тому, чтобы сохранить новый файл с именем равным значению ячейки в новой книге. короче, как сохранить книгу с именем, которое равно значению ячейки в ней же. надеюсь, не запутал

Решение задачи: «Создать имя файла, соответствующее ячейке»

textual
                            Листинг программы 
                        

                            Sub Макрос1()
'Есть ещё SaveCopyAs.
'Вместо .xls можно использовать др. расширения Excel (например, xlsx).
ActiveWorkbook.SaveAs _
    Filename:="C:\Documents and Settings\Пользователь\Рабочий стол\" & _
    ActiveWorkbook.Worksheets(1).Cells(1, 1).Text & ".xls"
End Sub
                        