Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1345 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA] Equivalent du .GetOpenFilename dans Word

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA] Equivalent du .GetOpenFilename dans Word

n°2049139
quieto
Demon Called Deception
Posté le 14-01-2011 à 16:14:41  profilanswer
 

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

mood
Publicité
Posté le 14-01-2011 à 16:14:41  profilanswer
 

n°2049145
quieto
Demon Called Deception
Posté le 14-01-2011 à 16:36:20  profilanswer
 

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
 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA] Equivalent du .GetOpenFilename dans Word

 

Sujets relatifs
[VBA] faisabilité[VBA access] Copie de graphique Access vers Excel
[VBA] Adapter la taille de plusieurs images pour impression[VBA Excel 2003 - débutant] Macro et renommage d'un classeur Excell
Prgm VBA et ou Excel - RechercheV ... recherche du nom le plus long[VBA Access] Gérer valeur null d'une requête
VBA Excel 2003 colorier cellule RGBVBA Excel : récupérer des termes de l'instruction
[VBA - Excel] Vlookup vers un autre fichier[VBA Access] parcourir chaine de caractères[RESOLUS]
Plus de sujets relatifs à : [VBA] Equivalent du .GetOpenFilename dans Word


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR