Equivalent du .GetOpenFilename dans Word [VBA] - VB/VBA/VBS - Programmation
Marsh Posté le 14-01-2011 à 16:36:20
J'ai finalement trouvé ...
Pour ceux que ca interesse :
Private Sub File_Click()
Dim finput As FileDialog
Dim Chemin As String
Set finput = Application.FileDialog(msoFileDialogOpen)
finput.Show
Chemin = finput.SelectedItems(1)
MsgBox "Le chemin est " & Chemin, vbInformation, "Test"
End Sub
Marsh Posté le 14-01-2011 à 16:14:41
Bonjour,
J'aurais besoin de l'equivalent de la fonction .GetOpenFilename, utilisable dans Excel, afin de pouvoir trouver le chemin d'un fichier, dans une macro Word cette fois, et je me casse la tete la dessus...
Ce serait pour l'utiliser comme ceci :
Chemin = Application.GetOpenFilename
Et reutiliser Chemin.
Des idées ?
Merci d'avance