Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Changer le nom de la cellule!

Changer le nom de la cellule!

10 réponses
Avatar
STEN
Bonjour,=20
Dans un classeur, j'ai une cellule qui =E0 pour=20
nom "Janvier".
J'aimerai =E0 l'aide d'une macro que le nom passe =E0 F=E9vrier=20
et ainsi de suite =E0 chaque fois que j'execute la macro ce=20
jusque decembre.
Il faudrait par la m=EAme occasion que l'onglet prenne le=20
aussi le nom de la celule.
Merci pour vos suggestions.
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
ru-th
Salut

sur 1 ligne
[a1].Name.Name = Format("1/" & Month(Format("1/" & [a1].Name.Name, mmmm)) +
1, "mmmm")

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"STEN" a écrit dans le message de
news:23bc401c45ee2$97b57d10$
Bonjour,
Dans un classeur, j'ai une cellule qui à pour
nom "Janvier".
J'aimerai à l'aide d'une macro que le nom passe à Février
et ainsi de suite à chaque fois que j'execute la macro ce
jusque decembre.
Il faudrait par la même occasion que l'onglet prenne le
aussi le nom de la celule.
Merci pour vos suggestions.
Avatar
ru-th
Ne lisant pas les questions en entier, :-((
pour la 2ème partie, rajoutes
ActiveSheet.Name = [a1].Name.Name

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"ru-th" a écrit dans le message de
news:%
Salut

sur 1 ligne
[a1].Name.Name = Format("1/" & Month(Format("1/" & [a1].Name.Name, mmmm))
+

1, "mmmm")

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"STEN" a écrit dans le message de
news:23bc401c45ee2$97b57d10$
Bonjour,
Dans un classeur, j'ai une cellule qui à pour
nom "Janvier".
J'aimerai à l'aide d'une macro que le nom passe à Février
et ainsi de suite à chaque fois que j'execute la macro ce
jusque decembre.
Il faudrait par la même occasion que l'onglet prenne le
aussi le nom de la celule.
Merci pour vos suggestions.




Avatar
STEN
Merci pour vos réponses!
-----Message d'origine-----
Salut

sur 1 ligne
[a1].Name.Name = Format("1/" & Month(Format("1/" &
[a1].Name.Name, mmmm)) +

1, "mmmm")

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"STEN" a écrit dans le message de
news:23bc401c45ee2$97b57d10$
Bonjour,
Dans un classeur, j'ai une cellule qui à pour
nom "Janvier".
J'aimerai à l'aide d'une macro que le nom passe à Février
et ainsi de suite à chaque fois que j'execute la macro ce
jusque decembre.
Il faudrait par la même occasion que l'onglet prenne le
aussi le nom de la celule.
Merci pour vos suggestions.


.



Avatar
STEN
Salut, impossible de passer la formule cela me renvoi a
chaque fois un message d'erreur ou dois-je mettre le code
pour que cela fonctionne dans la cellule a1 j'ai entrer
janvier, j'ai essayer en mettant le code dans un module
et de l'attribuer a un bouton pour executer le code mais
a chaque fois j'ais un message d'erreur je ne comprend
pas bien le fonctionnement je m'en excuse.
si vous pouviez m'éclairer!
Merci
-----Message d'origine-----
Salut

sur 1 ligne
[a1].Name.Name = Format("1/" & Month(Format("1/" &
[a1].Name.Name, mmmm)) +

1, "mmmm")

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"STEN" a écrit dans le message de
news:23bc401c45ee2$97b57d10$
Bonjour,
Dans un classeur, j'ai une cellule qui à pour
nom "Janvier".
J'aimerai à l'aide d'une macro que le nom passe à Février
et ainsi de suite à chaque fois que j'execute la macro ce
jusque decembre.
Il faudrait par la même occasion que l'onglet prenne le
aussi le nom de la celule.
Merci pour vos suggestions.


.



Avatar
michdenis
Bonsoir Sten,

Essaie ceci :

'-----------------------
Sub sa()
Dim NouveauNom As String
With Worksheets("Janvier")
For a = 2 To 12
NouveauNom = Format(DateSerial(2004, a, 1), "MMMM")
.Range("Janvier").Name = NouveauNom
.Name = NouveauNom
Next
End With
End Sub
'-----------------------


Salutations!



"STEN" a écrit dans le message de news:24dcc01c45fbf$c3e9fae0$
Salut, impossible de passer la formule cela me renvoi a
chaque fois un message d'erreur ou dois-je mettre le code
pour que cela fonctionne dans la cellule a1 j'ai entrer
janvier, j'ai essayer en mettant le code dans un module
et de l'attribuer a un bouton pour executer le code mais
a chaque fois j'ais un message d'erreur je ne comprend
pas bien le fonctionnement je m'en excuse.
si vous pouviez m'éclairer!
Merci
-----Message d'origine-----
Salut

sur 1 ligne
[a1].Name.Name = Format("1/" & Month(Format("1/" &
[a1].Name.Name, mmmm)) +

1, "mmmm")

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"STEN" a écrit dans le message de
news:23bc401c45ee2$97b57d10$
Bonjour,
Dans un classeur, j'ai une cellule qui à pour
nom "Janvier".
J'aimerai à l'aide d'une macro que le nom passe à Février
et ainsi de suite à chaque fois que j'execute la macro ce
jusque decembre.
Il faudrait par la même occasion que l'onglet prenne le
aussi le nom de la celule.
Merci pour vos suggestions.


.



Avatar
michdenis
En supplément,

Cela suppose que tu as déjà une cellule nommée "Janvier" et une feuille dont le nom de l'onglet est "Janvier".

D'où la boucle de 2 à 12 . sinon utilise ceci :

'--------------------------
Sub LesNoms()

With Worksheets("Feuil1")
For a = 1 To 12
NouveauNom = Format(DateSerial(2004, a, 1), "MMMM")
.Range("A1").Name = NouveauNom
.Name = NouveauNom
Next
End With
End Sub
'--------------------------

Salutations!



"michdenis" a écrit dans le message de news:
Bonsoir Sten,

Essaie ceci :

'-----------------------
Sub sa()
Dim NouveauNom As String
With Worksheets("Janvier")
For a = 2 To 12
NouveauNom = Format(DateSerial(2004, a, 1), "MMMM")
.Range("Janvier").Name = NouveauNom
.Name = NouveauNom
Next
End With
End Sub
'-----------------------


Salutations!



"STEN" a écrit dans le message de news:24dcc01c45fbf$c3e9fae0$
Salut, impossible de passer la formule cela me renvoi a
chaque fois un message d'erreur ou dois-je mettre le code
pour que cela fonctionne dans la cellule a1 j'ai entrer
janvier, j'ai essayer en mettant le code dans un module
et de l'attribuer a un bouton pour executer le code mais
a chaque fois j'ais un message d'erreur je ne comprend
pas bien le fonctionnement je m'en excuse.
si vous pouviez m'éclairer!
Merci
-----Message d'origine-----
Salut

sur 1 ligne
[a1].Name.Name = Format("1/" & Month(Format("1/" &
[a1].Name.Name, mmmm)) +

1, "mmmm")

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"STEN" a écrit dans le message de
news:23bc401c45ee2$97b57d10$
Bonjour,
Dans un classeur, j'ai une cellule qui à pour
nom "Janvier".
J'aimerai à l'aide d'une macro que le nom passe à Février
et ainsi de suite à chaque fois que j'execute la macro ce
jusque decembre.
Il faudrait par la même occasion que l'onglet prenne le
aussi le nom de la celule.
Merci pour vos suggestions.


.



Avatar
ru-th
Salut

janvier c'est le contenu de la cellule ou le nom de la cellule ?

a+
rural thierry

"STEN" a écrit dans le message de
news: 24dcc01c45fbf$c3e9fae0$
Salut, impossible de passer la formule cela me renvoi a
chaque fois un message d'erreur ou dois-je mettre le code
pour que cela fonctionne dans la cellule a1 j'ai entrer
janvier, j'ai essayer en mettant le code dans un module
et de l'attribuer a un bouton pour executer le code mais
a chaque fois j'ais un message d'erreur je ne comprend
pas bien le fonctionnement je m'en excuse.
si vous pouviez m'éclairer!
Merci
-----Message d'origine-----
Salut

sur 1 ligne
[a1].Name.Name = Format("1/" & Month(Format("1/" &
[a1].Name.Name, mmmm)) +

1, "mmmm")

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"STEN" a écrit dans le message de
news:23bc401c45ee2$97b57d10$
Bonjour,
Dans un classeur, j'ai une cellule qui à pour
nom "Janvier".
J'aimerai à l'aide d'une macro que le nom passe à Février
et ainsi de suite à chaque fois que j'execute la macro ce
jusque decembre.
Il faudrait par la même occasion que l'onglet prenne le
aussi le nom de la celule.
Merci pour vos suggestions.


.



Avatar
sabatier
de quoi je me mêle, mon père? ne devriez-vous pas être encore aux
matines à cette heure-ci, non sans être allé, auparavant, de mâle en pis
pour quelque traite, sain aérobic matinal si on ne prend pas trop de
coups de queue en travers de la g.....ce qui ne devrait pas, toutefois,
vous faire vous désabonner de microsoft.public.seauettabouret.fr, ce
que, là encore, je souhaite vivement, trop déçu que je serais de perdre
la trop belle cible à scuds que j'ai dessinée sur votre soutane noire
jps

ru-th a écrit:
Salut

janvier c'est le contenu de la cellule ou le nom de la cellule ?

a+
rural thierry

"STEN" a écrit dans le message de
news: 24dcc01c45fbf$c3e9fae0$
Salut, impossible de passer la formule cela me renvoi a
chaque fois un message d'erreur ou dois-je mettre le code
pour que cela fonctionne dans la cellule a1 j'ai entrer
janvier, j'ai essayer en mettant le code dans un module
et de l'attribuer a un bouton pour executer le code mais
a chaque fois j'ais un message d'erreur je ne comprend
pas bien le fonctionnement je m'en excuse.
si vous pouviez m'éclairer!
Merci

-----Message d'origine-----
Salut

sur 1 ligne
[a1].Name.Name = Format("1/" & Month(Format("1/" &


[a1].Name.Name, mmmm)) +

1, "mmmm")

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"STEN" a écrit dans le message de
news:23bc401c45ee2$97b57d10$
Bonjour,
Dans un classeur, j'ai une cellule qui à pour
nom "Janvier".
J'aimerai à l'aide d'une macro que le nom passe à Février
et ainsi de suite à chaque fois que j'execute la macro ce
jusque decembre.
Il faudrait par la même occasion que l'onglet prenne le
aussi le nom de la celule.
Merci pour vos suggestions.


.








Avatar
P.R.B.
Par le Très Saint Père (dit TSP),
en voilà une façon d'accueillir la brebis qui revient à l'étable après
quelques mois passés à brouter l'herbe d'autres prairies qu'il l'empêchai de
gloser sur les déviations chirogourdistes, la sénilité d'un biscotteau, la
volatilité d'une misange et j'en passe.
Elle est peut-être galeuse la brebis ?
encore heureux que vous n'eutes point écrit de quoi, je me bêle !

P.R.B.
"sabatier" a écrit dans le message
de news:
de quoi je me mêle, mon père? ne devriez-vous pas être encore aux
matines à cette heure-ci, non sans être allé, auparavant, de mâle en pis
pour quelque traite, sain aérobic matinal si on ne prend pas trop de
coups de queue en travers de la g.....ce qui ne devrait pas, toutefois,
vous faire vous désabonner de microsoft.public.seauettabouret.fr, ce
que, là encore, je souhaite vivement, trop déçu que je serais de perdre
la trop belle cible à scuds que j'ai dessinée sur votre soutane noire
jps

ru-th a écrit:
Salut

janvier c'est le contenu de la cellule ou le nom de la cellule ?

a+
rural thierry

"STEN" a écrit dans le message de
news: 24dcc01c45fbf$c3e9fae0$
Salut, impossible de passer la formule cela me renvoi a
chaque fois un message d'erreur ou dois-je mettre le code
pour que cela fonctionne dans la cellule a1 j'ai entrer
janvier, j'ai essayer en mettant le code dans un module
et de l'attribuer a un bouton pour executer le code mais
a chaque fois j'ais un message d'erreur je ne comprend
pas bien le fonctionnement je m'en excuse.
si vous pouviez m'éclairer!
Merci

-----Message d'origine-----
Salut

sur 1 ligne
[a1].Name.Name = Format("1/" & Month(Format("1/" &


[a1].Name.Name, mmmm)) +

1, "mmmm")

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"STEN" a écrit dans le message de
news:23bc401c45ee2$97b57d10$
Bonjour,
Dans un classeur, j'ai une cellule qui à pour
nom "Janvier".
J'aimerai à l'aide d'une macro que le nom passe à Février
et ainsi de suite à chaque fois que j'execute la macro ce
jusque decembre.
Il faudrait par la même occasion que l'onglet prenne le
aussi le nom de la celule.
Merci pour vos suggestions.


.











Avatar
STEN
Merci pour votre aide a tous
-----Message d'origine-----
En supplément,

Cela suppose que tu as déjà une cellule nommée "Janvier"
et une feuille dont le nom de l'onglet est "Janvier".


D'où la boucle de 2 à 12 . sinon utilise ceci :

'--------------------------
Sub LesNoms()

With Worksheets("Feuil1")
For a = 1 To 12
NouveauNom = Format(DateSerial(2004, a,
1), "MMMM")

.Range("A1").Name = NouveauNom
.Name = NouveauNom
Next
End With
End Sub
'--------------------------

Salutations!



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

Bonsoir Sten,

Essaie ceci :

'-----------------------
Sub sa()
Dim NouveauNom As String
With Worksheets("Janvier")
For a = 2 To 12
NouveauNom = Format(DateSerial(2004, a,
1), "MMMM")

.Range("Janvier").Name = NouveauNom
.Name = NouveauNom
Next
End With
End Sub
'-----------------------


Salutations!



"STEN" a écrit
dans le message de news:24dcc01c45fbf$c3e9fae0

$
Salut, impossible de passer la formule cela me renvoi a
chaque fois un message d'erreur ou dois-je mettre le code
pour que cela fonctionne dans la cellule a1 j'ai entrer
janvier, j'ai essayer en mettant le code dans un module
et de l'attribuer a un bouton pour executer le code mais
a chaque fois j'ais un message d'erreur je ne comprend
pas bien le fonctionnement je m'en excuse.
si vous pouviez m'éclairer!
Merci
-----Message d'origine-----
Salut

sur 1 ligne
[a1].Name.Name = Format("1/" & Month(Format("1/" &
[a1].Name.Name, mmmm)) +

1, "mmmm")

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo (à l'essai)

"STEN" a écrit dans le message de
news:23bc401c45ee2$97b57d10$
Bonjour,
Dans un classeur, j'ai une cellule qui à pour
nom "Janvier".
J'aimerai à l'aide d'une macro que le nom passe à
Février


et ainsi de suite à chaque fois que j'execute la macro
ce


jusque decembre.
Il faudrait par la même occasion que l'onglet prenne le
aussi le nom de la celule.
Merci pour vos suggestions.


.





.