Insérer le nom du dossier dans une cellule

pogote · 19 Mars 2012

Bonjour,

Après avoir recherché sur le forum je n'ai pas trouvé réponse à ma simple question :

Comment insérer le nom du dossier dans une cellule ?

Je ne souhaite pas insérer le nom du fichier, ni celui de l'onglet, ni le chemin d'accès (ça j'ai trouvé), mais uniquement le nom du dossier mère comme dans l'image ci dessous.

N'étant pas du tout compétent en terme de macro, si quelqu'un à une solution de ce type, merci d'être précis dans votre description.

D'avance Merci
et à bientôt....

pierrejean · 19 Mars 2012

Re : Insérer le nom du dossier dans une cellule

Bonjour pogote

Avec une fonction personnalisée

JHA · 19 Mars 2012

Re : Insérer le nom du dossier dans une cellule

Bonjour à tous,

A essayer:

=STXT(STXT(CELLULE("nomfichier";A1);CHERCHE("[";CELLULE("nomfichier";A1);1)+1;99);1;CHERCHE("]";STXT(CELLULE("nomfichier";A1);CHERCHE("[";CELLULE("nomfichier";A1);1)+2;99)))

Edit: Oups! pas compris j'ai donné le nom de fichier

JHA

sousou · 19 Mars 2012

Re : Insérer le nom du dossier dans une cellule

bonjour

Function dossier()
chemin = ThisWorkbook.Path
dossier = Right(chemin, Len(chemin) - InStrRev(chemin, "\"))
End Function

Pas vue pierre jean

pierrejean · 19 Mars 2012

Re : Insérer le nom du dossier dans une cellule

Re

Pas de problème sousou !
Notre ami aura le choix

pogote · 20 Mars 2012

Re : Insérer le nom du dossier dans une cellule

Et bien merci à vous !

C'est super, ça fonctionne... je ne sais pas comment mais ça fonctionne.

A Bientôt

Insérer le nom du dossier dans une cellule

pogote

XLDnaute Nouveau

pierrejean

XLDnaute Barbatruc

Pièces jointes

JHA

XLDnaute Barbatruc

sousou

XLDnaute Barbatruc

pierrejean

XLDnaute Barbatruc

pogote

XLDnaute Nouveau

Discussions similaires