Hi,

I want to be able to move a selection of sheets to a new workbook, and
name the file (this does not change so I would declare this as a
string - I think), however, I would like the newly created file to be
saved in the current directory (the directory of the original file).
How can I do this?

Also,
In case I don't figure it out, what is the code for setting the
filename in the macro?

kind regards,

Matt

One way:

Const csFILENAME As String = "MyBook.xls"

With ThisWorkbook
.SaveAs Filename:=.Path & Application.PathSeparator & csFILENAME
End With


In article <(E-Mail Removed)>,
"Guerilla" <(E-Mail Removed)> wrote:

> Hi,
>
> I want to be able to move a selection of sheets to a new workbook, and
> name the file (this does not change so I would declare this as a
> string - I think), however, I would like the newly created file to be
> saved in the current directory (the directory of the original file).
> How can I do this?
>
> Also,
> In case I don't figure it out, what is the code for setting the
> filename in the macro?
>
> kind regards,
>
> Matt