OVH Cloud OVH Cloud

Récupération du nom de l'onglet

8 réponses
Avatar
Philippe B
Salut tout le monde !

Je voulais savoir s'il était possible de récupérer le nom de l'onglet. Et si
oui, de quelle façon ?

Si c'est par le biais d'une macro, n'hésitez surtout pas à me donner un
maximum de détail.

Un grand merci par avace pour vos réponses.

Bien Amicalement

Philippe

"La musique est un cri qui vient de l'intérieur"
Bernard LAVILLIERS, Pétomane

8 réponses

Avatar
RGI
Bonjour

ceci doit faire ce qui est demandé

=STXT(CELLULE("filename";A1);TROUVE("]";CELLULE("filename";A1))+1;32)

Salutations

RGI

Salut tout le monde !

Je voulais savoir s'il était possible de récupérer le nom de l'onglet. Et si
oui, de quelle façon ?

Si c'est par le biais d'une macro, n'hésitez surtout pas à me donner un
maximum de détail.

Un grand merci par avace pour vos réponses.

Bien Amicalement

Philippe

"La musique est un cri qui vient de l'intérieur"
Bernard LAVILLIERS, Pétomane





Avatar
stéphane
Bonjour,

fonction personnalisée ci-dessous à placer dans un module

Function NomOnglet() As String

NomOnglet = ActiveSheet.Name

End Function

Stéphane



"Philippe B" a écrit dans le message de news:
%
Salut tout le monde !

Je voulais savoir s'il était possible de récupérer le nom de l'onglet. Et
si oui, de quelle façon ?

Si c'est par le biais d'une macro, n'hésitez surtout pas à me donner un
maximum de détail.

Un grand merci par avace pour vos réponses.

Bien Amicalement

Philippe

"La musique est un cri qui vient de l'intérieur"
Bernard LAVILLIERS, Pétomane



Avatar
Excel...lent
Salut Philippe,

Peut-être un truc dans ce genre ( à mettre dans le code de la feuille dont
tu veux récupérer le nom ) :

Private Sub Worksheet_Activate()
[a1] = ActiveSheet.Name
End Sub

Affichera en cellule A1 le nom de la feuille.

Cordialement.

Marc
Avatar
Jacquouille
Bonjour
Je viens de tester et cela fonctionne.
C'est pourquoi je ne comprends pas la présence de A1 dans ta formule....
Si tu as 30 secondes pour explications?

Un garnd merci et bonne soirée

--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"RGI" a écrit dans le message de news:

Bonjour

ceci doit faire ce qui est demandé

=STXT(CELLULE("filename";A1);TROUVE("]";CELLULE("filename";A1))+1;32)

Salutations

RGI

Salut tout le monde !

Je voulais savoir s'il était possible de récupérer le nom de l'onglet. Et
si oui, de quelle façon ?

Si c'est par le biais d'une macro, n'hésitez surtout pas à me donner un
maximum de détail.

Un grand merci par avace pour vos réponses.

Bien Amicalement

Philippe

"La musique est un cri qui vient de l'intérieur"
Bernard LAVILLIERS, Pétomane






Avatar
RGI
il suffit de se plonger un peu dans l'aide et les explications y sont

Référence est la cellule sur laquelle vous voulez des informations.
Si vous ne la définissez pas, les informations spécifiées dans type_info
sont renvoyées pour la dernière cellule modifiée.

donc ceci fonctionne aussi 8-)

=STXT(CELLULE("filename");TROUVE("]";CELLULE("filename"))+1;10)

salutations

RGI


Bonjour
Je viens de tester et cela fonctionne.
C'est pourquoi je ne comprends pas la présence de A1 dans ta formule....
Si tu as 30 secondes pour explications?

Un garnd merci et bonne soirée




Avatar
AV
C'est pourquoi je ne comprends pas la présence de A1 dans ta formule....


Mon cher Secrétaire,

Fais le test suivant :

Dans "Feuil2" d'un classeur comprenant 2 feuilles (ou plus)
En B1:
=STXT(CELLULE("filename";A1);TROUVE("]";CELLULE("filename";A1))+1;32)
En C1:
=STXT(CELLULE("filename");TROUVE("]";CELLULE("filename"))+1;32)

Enregistrer ensuite le fichier
Exemple de résultat obtenu en B1 ET C1 de "Feuil2" :
Feuil2
Donc, jusque là, tout va bien.
Changer le nom du 1° onglet ou d'un autre (à l'exception de celui
contenant les formules)
Allez ensuite jeter un oil en "Feuil2" pour voir les résultats renvoyés
par les 2 formules
....--->
Celle utilisant 2 arguments renvoie un résultat correct alors que l'autre
renvoie comme nom
de feuille celui de l'onglet dont le nom a été précédemment modifié !


Moralité : Lors de l'utilisation de la fonction CELLULE, ne jamais faire
l'impasse sur le 2° argument qui est, pourtant, présenté comme facultatif

AV

Avatar
Jacquouille
Bonjour RGI
O combien est vrai ce zeste d'allusion à ma paresse.
Mais ta réponse aura eu un mérite: celui de m'obliger à y aller.
Donc, merci -))
Jacques.
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"RGI" a écrit dans le message de news:

il suffit de se plonger un peu dans l'aide et les explications y sont

Référence est la cellule sur laquelle vous voulez des informations. Si
vous ne la définissez pas, les informations spécifiées dans type_info sont
renvoyées pour la dernière cellule modifiée.

donc ceci fonctionne aussi 8-)

=STXT(CELLULE("filename");TROUVE("]";CELLULE("filename"))+1;10)

salutations

RGI


Bonjour
Je viens de tester et cela fonctionne.
C'est pourquoi je ne comprends pas la présence de A1 dans ta formule....
Si tu as 30 secondes pour explications?

Un garnd merci et bonne soirée






Avatar
Jacquouille
Mon Cher Président,
Donc si je ne m'abuse (Docteur) on pourrait résumer que l'un fige et l'autre
actualise .....
Ceci dit, dans la langue d'oil -))))
Un tout grand merci pour cette galante, savante et savourée explication bien
pédagogique et tout et tout. Le tout, digne des bons moments de MPFE,
lorsque l'on apprenait à remplir une cel à notre JPS qui enfile déjà son
maillot pour ce soir. -)
Encore merci.
Jacques,
Votre dévoué Secrétaire.
--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"AV" a écrit dans le message de news:

C'est pourquoi je ne comprends pas la présence de A1 dans ta formule....


Mon cher Secrétaire,

Fais le test suivant :

Dans "Feuil2" d'un classeur comprenant 2 feuilles (ou plus)
En B1:
=STXT(CELLULE("filename";A1);TROUVE("]";CELLULE("filename";A1))+1;32)
En C1:
=STXT(CELLULE("filename");TROUVE("]";CELLULE("filename"))+1;32)

Enregistrer ensuite le fichier
Exemple de résultat obtenu en B1 ET C1 de "Feuil2" :
Feuil2
Donc, jusque là, tout va bien.
Changer le nom du 1° onglet ou d'un autre (à l'exception de celui
contenant les formules)
Allez ensuite jeter un oil en "Feuil2" pour voir les résultats
renvoyés par les 2 formules
....--->
Celle utilisant 2 arguments renvoie un résultat correct alors que
l'autre renvoie comme nom
de feuille celui de l'onglet dont le nom a été précédemment modifié !


Moralité : Lors de l'utilisation de la fonction CELLULE, ne jamais
faire l'impasse sur le 2° argument qui est, pourtant, présenté comme
facultatif

AV