récuperer nom du fichier choisi

bonjour
comment recuperer le nom d'un fichier selectionné par un utilisateur au travers d'une boite de dialogue navigateur du genre suivant ?

Msg = "Vous devez rechercher un fichier , Souhaitez-vous continuer?"
Style = vbYesNo + vbQuestion
Title = "Rechercher du fichier nommé : BaseEleve.xls"
Response = MsgBox(Msg, Style, Title)
If Response = vbYes Then ' L'utilisateur a choisi Oui.
Fichier = Application.GetOpenFilename("recherche de : BaseEleve.xls (*.xls), *.xls")

If Fichier <> False Then 'fichier trouvé
ICI -----------------------------------------------------------------------------

msgbox "Nom du fichier "
---------------------------------------------------------------------------------
Exit Sub
Else ' "fichier pas trouvé
End
End If

Else ' L'utilisateur a choisi Non.
End
End If

merci