Assigning Name to new workbook

[Dan]

Want to assign a name to a worksheet based on user input.

DataFileName = Application.GetOpenFilename(filefilter:="Text or ASC Files,
*.txt; *.asc", Title:="Select the Data File")

'Create A New WorkBook With One Worksheet
Workbooks.Add template:=xlWorksheet

Want the workbook name to be the same name as that opened by DataFileName
and not "Sheet1".

Thanks

[Bob Phillips]

Then you need to save it with that filename, the filename only gets assigned
on a save.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Dan" <[email protected]> wrote in message
news:[email protected]...
> Want to assign a name to a worksheet based on user input.
>
> DataFileName = Application.GetOpenFilename(filefilter:="Text or ASC
Files,
> *.txt; *.asc", Title:="Select the Data File")
>
> 'Create A New WorkBook With One Worksheet
> Workbooks.Add template:=xlWorksheet
>
> Want the workbook name to be the same name as that opened by DataFileName
> and not "Sheet1".
>
> Thanks

[Dan]

Is there a way to prefill in the "File Name:" in the Save As window?


"Bob Phillips" wrote:

> Then you need to save it with that filename, the filename only gets assigned
> on a save.
>
> --
> HTH
>
> Bob Phillips
>
> (replace somewhere in email address with gmail if mailing direct)
>
> "Dan" <[email protected]> wrote in message
> news:[email protected]...
> > Want to assign a name to a worksheet based on user input.
> >
> > DataFileName = Application.GetOpenFilename(filefilter:="Text or ASC
> Files,
> > *.txt; *.asc", Title:="Select the Data File")
> >
> > 'Create A New WorkBook With One Worksheet
> > Workbooks.Add template:=xlWorksheet
> >
> > Want the workbook name to be the same name as that opened by DataFileName
> > and not "Sheet1".
> >
> > Thanks
>
>
>

[Bob Phillips]

Why would you use the SaveAs window? you have the filename so just save it
with that name.

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Dan" <[email protected]> wrote in message
news:[email protected]...
> Is there a way to prefill in the "File Name:" in the Save As window?
>
>
> "Bob Phillips" wrote:
>
> > Then you need to save it with that filename, the filename only gets
assigned
> > on a save.
> >
> > --
> > HTH
> >
> > Bob Phillips
> >
> > (replace somewhere in email address with gmail if mailing direct)
> >
> > "Dan" <[email protected]> wrote in message
> > news:[email protected]...
> > > Want to assign a name to a worksheet based on user input.
> > >
> > > DataFileName = Application.GetOpenFilename(filefilter:="Text or ASC
> > Files,
> > > *.txt; *.asc", Title:="Select the Data File")
> > >
> > > 'Create A New WorkBook With One Worksheet
> > > Workbooks.Add template:=xlWorksheet
> > >
> > > Want the workbook name to be the same name as that opened by
DataFileName
> > > and not "Sheet1".
> > >
> > > Thanks
> >
> >
> >