Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Nom d'onglet suivant contenu cellule

Nom d'onglet suivant contenu cellule

4 réponses
Avatar
Christian
Bonjour =E0 tous
Travaillant avec un tableau mensuel, je souhaiterais=20
pouvoir nommer de mani=E8re automatique l'onglet de la=20
feuille; =E0 savoir le nom du mois en cours repris en=20
cellule "J1" et au format "mmmm".
Pour ce faire, j'ai essay=E9 plusieurs code VBA relatifs =E0=20
l'insertion du nom de l'onglet trouv=E9s sur ce forum.
Je dois faire quelque chose de contraire car =E0 chaque=20
fois, j'obtiens le message d'erreur suivant: "Erreur=20
d'ex=E9cution 1004 - Erreur d=E9finie par l'application ou=20
par l'objet".
J'ai bien =E9t=E9 voir dans l'aide, mais malheureusement pour=20
moi, je n'y comprends rien.
Si vous pouviez me d=E9panner, cela serait formidable.
Merci d'avance=20
Christian
Signaler un problème avec ce contenu

4 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
Kamel
essaye cela

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Range("J1").Value <> "" Then _
ActiveSheet.Name = Range("J1").Value
End Sub

à mettre dans thisworkbook.

Kamel

"Christian" wrote in message
news:1641901c447cd$5e56ef80$
Bonjour à tous
Travaillant avec un tableau mensuel, je souhaiterais
pouvoir nommer de manière automatique l'onglet de la
feuille; à savoir le nom du mois en cours repris en
cellule "J1" et au format "mmmm".
Pour ce faire, j'ai essayé plusieurs code VBA relatifs à
l'insertion du nom de l'onglet trouvés sur ce forum.
Je dois faire quelque chose de contraire car à chaque
fois, j'obtiens le message d'erreur suivant: "Erreur
d'exécution 1004 - Erreur définie par l'application ou
par l'objet".
J'ai bien été voir dans l'aide, mais malheureusement pour
moi, je n'y comprends rien.
Si vous pouviez me dépanner, cela serait formidable.
Merci d'avance
Christian
Avatar
Kamel
un petit changement de la macro que je viens d'envoyer. celle-ci renommer la
feuille avec la valeur de la date et non avec le format "mmmm":

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Range("J1").Value <> "" Then _
ActiveSheet.Name = Format(Range("J1"), "MMMM")
End Sub

"Christian" wrote in message
news:1641901c447cd$5e56ef80$
Bonjour à tous
Travaillant avec un tableau mensuel, je souhaiterais
pouvoir nommer de manière automatique l'onglet de la
feuille; à savoir le nom du mois en cours repris en
cellule "J1" et au format "mmmm".
Pour ce faire, j'ai essayé plusieurs code VBA relatifs à
l'insertion du nom de l'onglet trouvés sur ce forum.
Je dois faire quelque chose de contraire car à chaque
fois, j'obtiens le message d'erreur suivant: "Erreur
d'exécution 1004 - Erreur définie par l'application ou
par l'objet".
J'ai bien été voir dans l'aide, mais malheureusement pour
moi, je n'y comprends rien.
Si vous pouviez me dépanner, cela serait formidable.
Merci d'avance
Christian
Avatar
Christian
Bonjour Kamel
Merci pour m'avoir répondu.
J'ai essayé ton code, lorsque je l'exécute, cela me
renvois à une fenêtre "Macro - nom de la macro(vide) -
Macros dans VBAProject(nom du fichie.xls)".
Et, l'onglet de la feuille reste vierge.
Peut-être manque t'il quelque chose ou que je ne fait pas
bien.
Christian
-----Message d'origine-----
un petit changement de la macro que je viens d'envoyer.
celle-ci renommer la

feuille avec la valeur de la date et non avec le
format "mmmm":


Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Range("J1").Value <> "" Then _
ActiveSheet.Name = Format(Range("J1"), "MMMM")
End Sub

"Christian" wrote
in message

news:1641901c447cd$5e56ef80$
Bonjour à tous
Travaillant avec un tableau mensuel, je souhaiterais
pouvoir nommer de manière automatique l'onglet de la
feuille; à savoir le nom du mois en cours repris en
cellule "J1" et au format "mmmm".
Pour ce faire, j'ai essayé plusieurs code VBA relatifs à
l'insertion du nom de l'onglet trouvés sur ce forum.
Je dois faire quelque chose de contraire car à chaque
fois, j'obtiens le message d'erreur suivant: "Erreur
d'exécution 1004 - Erreur définie par l'application ou
par l'objet".
J'ai bien été voir dans l'aide, mais malheureusement pour
moi, je n'y comprends rien.
Si vous pouviez me dépanner, cela serait formidable.
Merci d'avance
Christian


.



Avatar
Kamel
En effet, tu n'as pas à l'executer. Elle se lance automatiquement à chaque
fois que tu selectionnes une feuille.

"Christian" wrote in message
news:164ff01c447d8$d9501a30$
Bonjour Kamel
Merci pour m'avoir répondu.
J'ai essayé ton code, lorsque je l'exécute, cela me
renvois à une fenêtre "Macro - nom de la macro(vide) -
Macros dans VBAProject(nom du fichie.xls)".
Et, l'onglet de la feuille reste vierge.
Peut-être manque t'il quelque chose ou que je ne fait pas
bien.
Christian
-----Message d'origine-----
un petit changement de la macro que je viens d'envoyer.
celle-ci renommer la

feuille avec la valeur de la date et non avec le
format "mmmm":


Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Range("J1").Value <> "" Then _
ActiveSheet.Name = Format(Range("J1"), "MMMM")
End Sub

"Christian" wrote
in message

news:1641901c447cd$5e56ef80$
Bonjour à tous
Travaillant avec un tableau mensuel, je souhaiterais
pouvoir nommer de manière automatique l'onglet de la
feuille; à savoir le nom du mois en cours repris en
cellule "J1" et au format "mmmm".
Pour ce faire, j'ai essayé plusieurs code VBA relatifs à
l'insertion du nom de l'onglet trouvés sur ce forum.
Je dois faire quelque chose de contraire car à chaque
fois, j'obtiens le message d'erreur suivant: "Erreur
d'exécution 1004 - Erreur définie par l'application ou
par l'objet".
J'ai bien été voir dans l'aide, mais malheureusement pour
moi, je n'y comprends rien.
Si vous pouviez me dépanner, cela serait formidable.
Merci d'avance
Christian


.