Bonjour Delphine et le forum,
Question 1
----------
Essaye ceci :
MonFichier = Application.GetOpenFilename
If MonFichier = False Then
MsgBox "Aucun fichier n'a été sélectionné !", vbExclamation
Else
MsgBox "Fichier sélectionné : " & MonFichier, vbInformation
End If
Question 2
----------
Voir la réponse dans ce fil :
<http://www.excel-downloads.com/html/French/forum/messages/1_79138_79138.htm>
Slts
wally