Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

GetOpenFilename

L

Ludwig

Guest
Bonjour tout le monde,

J'espère que tout va bien chez vous car, pour ma part, je rencontre une fois de plus un petit soucis. Je m'explique: le GetOpenFilename me permet de chercher un fichier... Comment récupérer le nom du fichier pour le mettre comme valeur dans un label... heu !!! Label1.Caption = "le nom du fichier trouvé". (Ou Range("A1").Text = "le nom du fichier trouvé") ..

J'espère ne pas avoir gaché votre journée car avec des explications comme ça, il y a de quoi perdre patience... courage!

Désolé et merci d'avance.

Ludwig
 
M

michel

Guest
bonsoir Ludwig

ci dessous un exemple , avec insertion dans un label d'une feuille ( à adapter pour ton projet )

Private Sub CommandButton1_Click()
Dim Cible As String
Cible = Application.GetOpenFilename
Sheets("feuil1").Label1.Caption = Cible
End Sub


bonne soirée
Michel
 
L

Ludwig

Guest
Bonsoir Michel,

Merci pour ta première solution elle marche bien. Il me reste à l'adapter.
Pour la deuxième j'essais de suite.

Encore merci à toi et très bonne soirée.

Ludwig
 

Discussions similaires

Réponses
5
Affichages
311
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…