With Application.FileDialog(msoFileDialogOpen)
.Show
On Error Resume Next
chemin_complet_du_fichier_choisi = .SelectedItems(1)
End With
If Err = 0 Then MsgBox "tu as sélectionné le fichier " & chemin_complet_du_fichier_choisi
On Error GoTo 0
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question