Hi Jason
Just remove all the stuff behind GetOpenFilename:

MyXlPathway = Application.GetOpenFilename

regards
reklamo


"WhytheQ" wrote:

Hello,

The follwoing works ok:

'================================================= ===============
MyXlPathway = Application.GetOpenFilename("Excel Files (*.xls),*.xls,"
& _
"Excel Files (*.xlsx),*.xlsx," & _
"Excel Files (*.xlsm),*.xlsm," & _
"Add-in Files (*.xla),*.xla", , "Select
Excel file or add-in for XL Start-up")
'================================================= ===============

but I'd like it so that all the file types are displayed as soon as
the Open File window appears - with the above the user has to select
the file type using the bottom combobox to make those files visible.

Any help appreciated
Jason.

But that might let the user think he could select, say, a PowerPoint
presentation.

Try this:

MyXlPathway = Application.GetOpenFilename( _
"Excel Files
(*.xls;*.xlsx;*.xlsm;*.xla;*.xlam),*.xls;*.xlsx;*. xlsm;*.xla;*.xlam", , _
"Select Excel file or add-in for XL Start-up")

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
Peltier Technical Services, Inc. - http://PeltierTech.com
_______


"reklamo" wrote in message
...
Hi Jason
Just remove all the stuff behind GetOpenFilename:

MyXlPathway = Application.GetOpenFilename

regards
reklamo


"WhytheQ" wrote:

Hello,

The follwoing works ok:

'================================================= ===============
MyXlPathway = Application.GetOpenFilename("Excel Files (*.xls),*.xls,"
& _
"Excel Files (*.xlsx),*.xlsx," & _
"Excel Files (*.xlsm),*.xlsm," & _
"Add-in Files (*.xla),*.xla", , "Select
Excel file or add-in for XL Start-up")
'================================================= ===============

but I'd like it so that all the file types are displayed as soon as
the Open File window appears - with the above the user has to select
the file type using the bottom combobox to make those files visible.

Any help appreciated
Jason.