Visual Basic - Ventana Examinar

Hola, tengo una aplicacion en VB 6 en la que necesito leer un archivo Excel, sin embargo, la ubicacion del archivo puede variar. ¿Alguien podria decirme cómo se habilita la tipica ventana Examinar?

Puedes usar el CommonDialog, con el método ShowOpen. Lo agregas a tu proyecto en "Proyecto-Componentes-Microsoft Common Dialog"
y luego a tu formulario (en este ejemplo su nombre es "cmmArchivo" ).
Este es el código de ejemplo, puedes ponerlo en un botón de comando:

cmmArchivo.DialogTitle = "Buscar archivo para importar catálogo"
cmmArchivo.Filter = "Hojas de Excel|*.xls|Todos los archivos|*.*"
cmmArchivo.Flags = &H200000 Or &H4
cmmArchivo.ShowOpen
If cmmArchivo.FileTitle <> Space(0) Then
txtArchivo.Text = cmmArchivo.FileName
' Con esto ya obtienes el nombre del archivo.
End If

Muchas, muchas gracias, eso era lo que andaba buscando!!!!!!

Saludos
Rosy
Valparaíso - Chile