excel vba browse file

[jazzy]

I am trying to find a way to get a command button in excel to brows
through files so you can pick the file you want to open when you clic
on it

 

[Chip Pearson]

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]

Thank you for tryng to help me but what if the file u want to open i
not an excel file its an access fil

 

[Chip Pearson]

Try

Dim FName As Variant
FName = Application.GetOpenFilename("All files (*.*),*.*")
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