See Application.GetOpenFilename. E.g.,
Dim FName As Variant
FName = Application.GetOpenFilename("Excel Files (*.xls),*.xls")
If FName = False Then
' user clicked cancel
Else
MsgBox FName
End If
--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com
"jazzy " wrote in message
...
I am trying to find a way to get a command button in excel to
browse
through files so you can pick the file you want to open when
you click
on it.
---
Message posted from http://www.ExcelForum.com/