OVH Cloud OVH Cloud

Nom de la feuille = valeur d'une cell

7 réponses
Avatar
IMER09
Re bonjour à tous
je cherche une reponse depuis un moment avant de poser une question idiote
je n'ai pas trouver
en effet je voudrai non pas comme beaucoup que ma cellule est le nom de ma
feuille mais l'inverse !
Merci d'avance
en fait j'ai pas honte de poser des questions idiotes!!!!
--
IMER09

7 réponses

Avatar
Pounet95
Re,
Dans le module VBA de la feuille, utiliser le'évènement
change :

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Name = [A1]
End Sub


A chaque fois que la valeur de la cellule changera, celui de la feuille
suivra
Attention toutefois : le nom doit être valide sinon erreur ......

Bonne soirée
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

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

Re bonjour à tous
je cherche une reponse depuis un moment avant de poser une question idiote
je n'ai pas trouver
en effet je voudrai non pas comme beaucoup que ma cellule est le nom de ma
feuille mais l'inverse !
Merci d'avance
en fait j'ai pas honte de poser des questions idiotes!!!!
--
IMER09


Avatar
michdenis
Bonjour IMER09,

Le nom d'une feuille ne peut pas être plus long de 31 caractères
Ce nom doit être unique dans le classeur
les caractères : : [] * ? / sont interdis dans le nom d'une feuille.

si Range("A1") tient compte de ces 3 caractères :

ActiveSheet.name = range("A1")



Salutations!


"IMER09" a écrit dans le message de news:
Re bonjour à tous
je cherche une reponse depuis un moment avant de poser une question idiote
je n'ai pas trouver
en effet je voudrai non pas comme beaucoup que ma cellule est le nom de ma
feuille mais l'inverse !
Merci d'avance
en fait j'ai pas honte de poser des questions idiotes!!!!
--
IMER09
Avatar
lSteph
Bonjour,
en effet je voudrai non pas comme beaucoup que ma cellule ...
admettons a1

dans l'onglet clic droit code :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim iSect As Range
Set iSect = Intersect(Target, [A1])
On Error GoTo fin
ActiveSheet.Name = iSect
Exit Sub
fin:
MsgBox "désignation incorrecte pour le nom de cette feuille"
End Sub

'lSteph
"IMER09" a écrit dans le message de news:

Re bonjour à tous
je cherche une reponse depuis un moment avant de poser une question idiote
je n'ai pas trouver
en effet je voudrai non pas comme beaucoup que ma cellule est le nom de ma
feuille mais l'inverse !
Merci d'avance
en fait j'ai pas honte de poser des questions idiotes!!!!
--
IMER09


Avatar
lSteph
...oupsss pti t'oubli

Private Sub Worksheet_Change(ByVal Target As Range)
Dim iSect As Range
Set iSect = Intersect(Target, [A1])
On Error GoTo fin
If Not iSect Is Nothing Then
ActiveSheet.Name = iSect
End If
Exit Sub
fin:
MsgBox "désignation incorrecte pour le nom de cette feuille"
End Sub


"lSteph" a écrit dans le message de news:
%
Bonjour,
en effet je voudrai non pas comme beaucoup que ma cellule ...
admettons a1

dans l'onglet clic droit code :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim iSect As Range
Set iSect = Intersect(Target, [A1])
On Error GoTo fin
ActiveSheet.Name = iSect
Exit Sub
fin:
MsgBox "désignation incorrecte pour le nom de cette feuille"
End Sub

'lSteph
"IMER09" a écrit dans le message de news:

Re bonjour à tous
je cherche une reponse depuis un moment avant de poser une question
idiote
je n'ai pas trouver
en effet je voudrai non pas comme beaucoup que ma cellule est le nom de
ma
feuille mais l'inverse !
Merci d'avance
en fait j'ai pas honte de poser des questions idiotes!!!!
--
IMER09






Avatar
Mavichavel
Du fond de l'espace, de la station 10.40.2.250 , notre ami *IMER09* nous
fait parvenir en ce *mercredi* mémorable, le message suivant :

en fait j'ai pas honte de poser des questions idiotes!!!!


Il n'est nulle question idiote...la preuve, je ne savais pas que les noms
ne devaient pas excéder *31 caratères* (post de Michdenis) et rassure
toi,la question que tu poses, beaucoup espèrent que l'autre la posera,
c'est pourquoi je lis le forum excel, interviens rarement (pas assez fort)
et surtout suis admiratif devant le savoir de tous ("nos") MVP si
sympathiques et indulgents..
Bonne soirée et merci pour la question 'idiote' de la journée :D si tant
est quelle dû l'être... :-Z

--
MesNews : www.mesnews.net
Forum : news://news.zoo-logique.org/MesNews
Identifiant = zoo & MdP = entrer

Pour les amoureux de magie.
http://magic-buzzar.oldiblog.com/
On ne dit pas mon corridor, mais mon corps se repose.

Avatar
IMER09
Vous etes vraiment tous cool!!!
--
IMER09



Re,
Dans le module VBA de la feuille, utiliser le'évènement
change :

Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Name = [A1]
End Sub


A chaque fois que la valeur de la cellule changera, celui de la feuille
suivra
Attention toutefois : le nom doit être valide sinon erreur ......

Bonne soirée
--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
Conseillé :
http://dj.joss.free.fr/netiquet.htm
(charte, nétiquette, conseils, abréviations, souriettes...)
http://www.excelabo.net/mpfe/connexion.php
(connexion, conseils...)

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

Re bonjour à tous
je cherche une reponse depuis un moment avant de poser une question idiote
je n'ai pas trouver
en effet je voudrai non pas comme beaucoup que ma cellule est le nom de ma
feuille mais l'inverse !
Merci d'avance
en fait j'ai pas honte de poser des questions idiotes!!!!
--
IMER09






Avatar
patrick.sales
Bonjour,

Je suis ravi de trouver sur ce forum l'info que je cerchais depuis quelques
jours mais j'in une problématique encore différente pour automariser le mom
des feuilles.
Dans un classeur, j'ai un tableau (sur la première feuille) qui me sert à
pré-remplir d'autres feuilles avec des intitulés renseignés dans le tableau
(le nombre de feuilles à remplir varie en fonction du nombre de lignes du
tableau renseignées).
Le problème est que j'ai fait des copier-coller avec liaison entre le
tableau et les différentes autres feuilles et que donc le nom de la feuille
à faire apparaître apparait au moins 2 fois : tableau et feuille de calcul
préremplie;

Connaissez-vous une astuce qui me permettrait de contourner le fait que j'ai
un doublon du nom dans mon classeur ?
Solution : Le tableau sur un classeur et les feuilles prétabulées sur un
autre !!!!

Merci de vos réponses

Patrick
"michdenis" a écrit dans le message de news:


Bonjour IMER09,

Le nom d'une feuille ne peut pas être plus long de 31 caractères
Ce nom doit être unique dans le classeur
les caractères : : [] * ? / sont interdis dans le nom d'une
feuille.

si Range("A1") tient compte de ces 3 caractères :

ActiveSheet.name = range("A1")



Salutations!


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

Re bonjour à tous
je cherche une reponse depuis un moment avant de poser une question idiote
je n'ai pas trouver
en effet je voudrai non pas comme beaucoup que ma cellule est le nom de ma
feuille mais l'inverse !
Merci d'avance
en fait j'ai pas honte de poser des questions idiotes!!!!
--
IMER09