se ho ben capito, hai bisogno di una finestra di dialogo "Apri file".
Se è così, devi inserire nel tuo progetto il componente "Microsoft Common Dialog control 6.0" e inserire poi l'oggetto nella tua form e lo chiami CD.
Inserisci un CommandButton che chiami cmdSfoglia e sull'evento click del bottone scrivi:
codice:
Private Sub cmdSfoglia_Click()
On Error GoTo Errore
Dim strPercorsoFile As String
' Quando l'utente sceglie Annulla
' viene generato l'errore 32755 (cdlCancel).
CD.CancelError = True
' Apre la common dialog
CD.ShowOpen
' Legge il percorso del file
strPercorsoFile = CD.FileName
Exit Sub
Errore:
' Se l'utente ha cliccato Annulla sulla common dialog
' non appare alcun messaggio d'errore
If Err.Number <> cdlCancel Then
MsgBox Err.Number & " " & Err.Description
End If
End Sub
spero sia ciò che ti serve