Chemin Fichier dans Cellule en Vba

[MuscatMimi]

Bonjour a tout le Forum

Est-il possible en Vba de pouvoir afficher dans une cellule
le chemin du Fichier sans afficher le Nom du Fichier

ex: F:\Mes Documents Cat\Mes Courriers
Procédure que je placerais dans WorkBook_Open

Cordialement

 

[phlaurent55]

Re : Chemin Fichier dans Cellule en Vba

Bonjour vaucluse,

avec cette formule dans une cellule:

=GAUCHE(CELLULE("nomfichier");TROUVE("[";CELLULE("nomfichier"))-1)

il est nécessaire que le fichier soit sauvegardé

à+
Philippe

 

[youky(BJ)]

Re : Chemin Fichier dans Cellule en Vba

Bonjour Christian,
msgbox ThisWorkbook.Path

Bruno

 

[Efgé]

Re : Chemin Fichier dans Cellule en Vba

Bonjour vaucluse immo, Ahh... Votre Avatar.... enfin bref 😀
Je ne suis pas sur d'avoir compris la demande. Je peux vous donner un explorateur de fichier qui met en variable 1 le chemin selectionné et variable 2 le nom du classeur.
Cordialement

 

[Efgé]

Re : Chemin Fichier dans Cellule en Vba

EDIT Bonjour youky(BJ), phlaurent55, pas vu Désolé.

 

[MuscatMimi]

Re : Chemin Fichier dans Cellule en Vba

Bonjour youky(BJ), phlaurent55, efgé

Merci de vos réponse,
la seule qui corresponds a mon souhait est celle de phlaurent55

=GAUCHE(CELLULE("nomfichier");TROUVE("[";CELLULE("nomfichier"))-1)

mais en vba ça donnerais quoi?????

a plus a tous

 

[Pierrot93]

Re : Chemin Fichier dans Cellule en Vba

Bonjour à tous,

si j'ai bien compris...

Option Explicit
Private Sub Workbook_Open()
Range("A1").Value = ThisWorkbook.Path
End Sub

bonne soirée
@+

 

[MuscatMimi]

Re : Chemin Fichier dans Cellule en Vba

Bonjour youky(BJ), phlaurent55, efgé, Pierrot


Quel nunuche je suis ,même pas j'ai pensé a
ThisWorkBook.Path

merci pierrot,ainsi qu'au autre intervenant

a bientôt sur ce forum

 

[Staple1600]

Re : Chemin Fichier dans Cellule en Vba

Bonjour


Pour une fois je suis d'accord avec toi 😀

Quel nunuche je suis ,même pas j'ai pensé a
ThisWorkBook.Path

parce que à partir d'autres fils que tu as posté tu aurais pu trouvé tout seul
https://www.excel-downloads.com/threads/code-pour-ouvrir-un-fichier-txt.130087/
et en plus c'est moi qui te donnait la réponse !! (et nous étions le 2/11/2009)
Lien supprimé


(sans compter l'oubli de la touche F1 🙄 )

PS: des fois je me demande si tu lis vraiment les réponses que l'on te donne 😕