Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Fun with GetOpenFilename
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. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Fun with GetOpenFilename
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. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Fun with GetOpenFilename
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. |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Fun with GetOpenFilename
I like Jon's reply, but if you want, maybe...
Dim myFileName As Variant myFileName = Application.GetOpenFilename(Filefilter:="All Files, *.*") 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. -- Dave Peterson |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Fun with GetOpenFilename
On 15 Feb, 15:47, Dave Peterson wrote:
I like Jon's reply, but if you want, maybe... * * Dim myFileName As Variant * * myFileName = Application.GetOpenFilename(Filefilter:="All Files, *.*") 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. -- Dave Peterson- Hide quoted text - - Show quoted text - Thanks to everyone for the help - all worked fine. I used something very similar to Jon's. Jason. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
GetOpenFileName | Excel Programming | |||
GetOpenFileName with F*.txt | Excel Programming | |||
GetOpenFilename | Excel Programming | |||
GetOpenFilename | Excel Programming | |||
getopenfilename | Excel Programming |