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