VBA - File picker , XLSX & CSV

[JoeRooney]

Hi,

I am having an issue with the below piece of code for myfile picker , it is working fine for excel files but the csv files are notvisable when the file picker is open.

Is there any way of being able select either a csv or xlsxfile through a file picker?

Any help is greatly appreciated

Thanks


fNameAndPath =Application.GetOpenFilename(FileFilter:="Excel Files (*.XLSx), *.XLS,,*.CSV", Title:="Select File To Be Opened")
If fNameAndPath = False Then Exit Sub
Set wb = Workbooks.Open(fNameAndPath)

 

[Joe4]

When I use your code, and the browser both opens up, there is a "File Name" box at the bottom of the screen, and just to the right of that is another drop-down box that is set to: "Excel Files (*.XLSx)".
If I click on the arrow in the drop-down box, I can change the value to "(*.CSV)", which then shows all the CSV files.

 

[JoeRooney]

Thanks sorry I see that now, I can select the CSV files but where it says "Excel files" in the Dropdown box it is blank for the CSV files , I can still select just the text is blank.

I am not to worried about that though as long as can select them.

 

[Joe4]

That's odd - it shows for me.
Maybe it is a due to a different version of Excel, or something like that.

 

[Norie]

Try this.

    fNameAndPath = Application.GetOpenFilename(FileFilter:="Excel Files (*.xls*), *.XLS*,CSV FIles (*.csv),*.CSV", Title:="Select File To Be Opened")

 

[JoeRooney]

Thanks Norie that resolved it