Nom Feuille & Nom Fichier (Solution !!!)
Résolu
kjorgahn
-
Patrice33740 Messages postés 8400 Date d'inscription Statut Membre Dernière intervention -
Patrice33740 Messages postés 8400 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Il ne s'agit pas d'une question mais une solution (afin de trouver rapidement une réponse sans se perdre dans les méandres de trop nombreuse réponses dans d'autres forum :
Pour le nom du Fichier :
Dans un module de macro on met :
Attention !!! On Obtient le nom du fichier avec l'extention.
Pour Retirer l'extention dans le gestionnaire de nom créer :
FileName2 avec pour formule :
dans n'importe quelle cellule, n'importe où tu écris :
__________________________________________________________________________
Pour le nom de la Feuille :
Dans un module de macro on met :
puis utiliser dans n'importe quelle cellule et n'importe quel onglet la formule :
Il ne s'agit pas d'une question mais une solution (afin de trouver rapidement une réponse sans se perdre dans les méandres de trop nombreuse réponses dans d'autres forum :
Pour le nom du Fichier :
Dans un module de macro on met :
Function FileName() As String Application.Volatile FileName = Sheets.Parent.Name End Function
Attention !!! On Obtient le nom du fichier avec l'extention.
Pour Retirer l'extention dans le gestionnaire de nom créer :
FileName2 avec pour formule :
=GAUCHE(FileName();TROUVE(".";FileName())-1)
dans n'importe quelle cellule, n'importe où tu écris :
=FileName2
__________________________________________________________________________
Pour le nom de la Feuille :
Dans un module de macro on met :
Function SheetName() As String Application.Volatile SheetName = Application.Caller.Parent.Name End Function
puis utiliser dans n'importe quelle cellule et n'importe quel onglet la formule :
=SheetName()
1 réponse
-
Bonjour,
Et pour ceux qui veulent éviter les macros :
Nom de l'onglet:
=STXT(CELLULE("filename";A1);TROUVE("]";CELLULE("filename";A1))+1;99)
Nom du fichier:
=STXT(CELLULE("filename";A1);TROUVE("[";CELLULE("filename";A1))+1;TROUVE("]";CELLULE("filename";A6))-TROUVE("[";CELLULE("filename";A1))-1)
-
-
-
car il ne fait qu'une feuille à la fois
Il vaudrait mieux ne rien dire que d'affirmer des contre vérités : tes déductions kjorgahn sont fausses car pour avoir le nom du fichier il faut d'abord sauvegarder, ce qui est évident.
Les formules de Le Pingou (que je salue bien cordialement) sont totalement fonctionnelles et ce n'est pas judicieux de créer du code macro quand il existe déjà dans les fonctions excel. -
-
J'ai toujours testé cette fonction à mon travail, et sur un fichier enregistré ou non cela ne fonctionnait pas comme je le voulais. mais chez moi sans problème. je confirme donc les formules de "le pingou", même si je ne m'explique pas le problème à mon travail (même avec un fichier tout neuf et fraîchement enregistré). C'est pourquoi toi aussi gbinforme tu m'as jugé bien attivement, et le problème s'avère surement bien plus complexe, pour ton info quand le fichier n'est pas enregistré il te met #valeur et non ce que j'ai dis dans mon commentaire, preuve que l'enregistrement n'est pas en cause...
Après en ce qui me concerne je préfère utiliser les macros, parce que de toute façon j'en utilise très souvent et qu'elle est petite (je parle de celle pour l'onglet) et pour mon travail je n'ai apparemment pas le choix...
-
