Hi,
Add a module to your workbook and paste the code :

Public Sub openFile()
Dim strFileName As String
strFileName = Application.GetOpenFilename
Workbooks.Open strFileName
End Sub

and then add a button on the worksheet with Forms t.bar or add a custo
button to a t.bar andd assign the macro to this button.

that's all you have to d

--
Message posted from http://www.ExcelForum.com