Finding file

[DKS]

Hi,

Via a macro is there any means to have a DIALOG box popped up that would
permit the user to browse the folders and select a file (or cancel the dialog
box). Once the file is identified, I want the macro to be able to get the
entire path including the file name BUT NOT OPEN the file. Thus the
xlDialogOpen... is not useful for me.

Any suggestions?

[mcg]

DKS napisal(a):
> Hi,
>
> Via a macro is there any means to have a DIALOG box popped up that would
> permit the user to browse the folders and select a file (or cancel the dialog
> box). Once the file is identified, I want the macro to be able to get the
> entire path including the file name BUT NOT OPEN the file. Thus the
> xlDialogOpen... is not useful for me.
>
> Any suggestions?

file = Application.GetOpenFilename
mcg

[DKS]

Thanks this does the trick. Nevertheless on testing it, when clicking on
cancel the resulting value is FALSE. Thus, how do I test for this in the
macro? If I put

IF NOT file

then the above works well when I click cancel but not at all when I select a
good file name; I get a 'type mismatch" error.

Thanks for your previous tip.

"mcg" wrote:

>
> DKS napisal(a):
> > Hi,
> >
> > Via a macro is there any means to have a DIALOG box popped up that would
> > permit the user to browse the folders and select a file (or cancel the dialog
> > box). Once the file is identified, I want the macro to be able to get the
> > entire path including the file name BUT NOT OPEN the file. Thus the
> > xlDialogOpen... is not useful for me.
> >
> > Any suggestions?
>
> file = Application.GetOpenFilename
> mcg
>
>

[Tom Ogilvy]

Dim file as String
file = Application.GetOpenFilename
if file = "False" then
msgbox "You hit cancel"
exit sub
end if

--
Regards,
Tom Ogilvy


"DKS" wrote:

> Thanks this does the trick. Nevertheless on testing it, when clicking on
> cancel the resulting value is FALSE. Thus, how do I test for this in the
> macro? If I put
>
> IF NOT file
>
> then the above works well when I click cancel but not at all when I select a
> good file name; I get a 'type mismatch" error.
>
> Thanks for your previous tip.
>
> "mcg" wrote:
>
> >
> > DKS napisal(a):
> > > Hi,
> > >
> > > Via a macro is there any means to have a DIALOG box popped up that would
> > > permit the user to browse the folders and select a file (or cancel the dialog
> > > box). Once the file is identified, I want the macro to be able to get the
> > > entire path including the file name BUT NOT OPEN the file. Thus the
> > > xlDialogOpen... is not useful for me.
> > >
> > > Any suggestions?
> >
> > file = Application.GetOpenFilename
> > mcg
> >
> >

[Jim Thomlinson]

Give this a try...

Sub test()
Dim strFile As String

strFile = Application.GetOpenFilename

If strFile = "False" Then
MsgBox "No file selected"
Exit Sub
End If
'The rest of your code...
End Sub
--
HTH...

Jim Thomlinson


"DKS" wrote:

> Thanks this does the trick. Nevertheless on testing it, when clicking on
> cancel the resulting value is FALSE. Thus, how do I test for this in the
> macro? If I put
>
> IF NOT file
>
> then the above works well when I click cancel but not at all when I select a
> good file name; I get a 'type mismatch" error.
>
> Thanks for your previous tip.
>
> "mcg" wrote:
>
> >
> > DKS napisal(a):
> > > Hi,
> > >
> > > Via a macro is there any means to have a DIALOG box popped up that would
> > > permit the user to browse the folders and select a file (or cancel the dialog
> > > box). Once the file is identified, I want the macro to be able to get the
> > > entire path including the file name BUT NOT OPEN the file. Thus the
> > > xlDialogOpen... is not useful for me.
> > >
> > > Any suggestions?
> >
> > file = Application.GetOpenFilename
> > mcg
> >
> >

[DKS]

Thanks to all for the help. It works.

"DKS" wrote:

> Hi,
>
> Via a macro is there any means to have a DIALOG box popped up that would
> permit the user to browse the folders and select a file (or cancel the dialog
> box). Once the file is identified, I want the macro to be able to get the
> entire path including the file name BUT NOT OPEN the file. Thus the
> xlDialogOpen... is not useful for me.
>
> Any suggestions?