Hi


....
' Asking for file name
Const fTitle = "Select File!"
Const FilterList = "Templates (*.XLS), *.XLS"
fFullName = Application.GetOpenFilename(Title:=fTitle,
FileFilter:=FilterList)
If fFullName = "False" Then
MsgBox ("No file to open!")
ActiveWindow.Close
Exit Sub
End If
....


Arvi Laanemets


"ourspt" wrote in message
...
Hi All,

My Visual Basic application is using Excel for reporting.

I need to restrict the users of my application to open only excel files
from
the File-Open dialogue box.

Or

Is there any way to make default 'Excel files (*.xls)' in the Files type
combo box in the Open dialog box and disabling the Files type combo box,
so
that the users can only select excel files when they click File-Open.

Please help me in this regard.
--
ourspt