macro to show opening file dialog box

[pendle666]

Hello

I want my macro to show a list of files in a certain folder using the open file dialog box. This is what I have so far:

'
ChDir _
"J:\Payroll\Holiday Journal\"
Workbooks.Open Filename:= _
"J:\Payroll\Holiday Journal\"

obviously the

workbooks.open filename:=

but I want it to stop at this point to allow the user to select the file that they want. As it is it's giving me an error message.

Can someone point me in the right direction?

regards

Pendle

 

[ClulessChris]

http://msdn.microsoft.com/en-gb/library/cc221415(v=vs.95).aspx

Never knock on Death's door: ring the bell and run away! Death really hates that!

 

[pendle666]

Thanks but that wasn't referring to Visual Basic which I needed.

Thanks Anyway

 

[Andrzejek]

Try:

Dim f As FileDialog
Set f = Application.FileDialog(msoFileDialogFilePicker)
f.Show
MsgBox "file chosen is: " & f.SelectedItems(1)

Have fun.

---- Andy

 

[SkipVought]

Check out application.GetOpenFileName method

Skip,
[sub]
Just traded in my old subtlety...
for a NUANCE![/sub]

 

[pendle666]

Thanks for the suggestions, I'll try them on Monday when I'm back at work


regards

Pendle

 

[ClulessChris]

Thanks but that wasn't referring to Visual Basic which I needed.

Yes it does refer to VB, scroll down.

Never knock on Death's door: ring the bell and run away! Death really hates that!