nommer automatiquement une feuille d'après la valeur d'une cellule
3 réponses
superpro
Bonjour, j'aimerais nommer automatiquement une feuille d'après la valeur
d'une cellule de cette même feuille, cela doit être faisable.
Merci d'avance !!!
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
Jacky
Bonjour Pour le cellule A1 comme nom
If [a1] <> "" Then ActiveSheet.Name = [a1]
Salutations JJ
"superpro" a écrit dans le message de news:carlg0$r1g$
Bonjour, j'aimerais nommer automatiquement une feuille d'après la valeur d'une cellule de cette même feuille, cela doit être faisable. Merci d'avance !!!
Bonjour
Pour le cellule A1 comme nom
If [a1] <> "" Then ActiveSheet.Name = [a1]
Salutations
JJ
"superpro" <superprof@wanadoo.fr> a écrit dans le message de
news:carlg0$r1g$1@aphrodite.grec.isp.9tel.net...
Bonjour, j'aimerais nommer automatiquement une feuille d'après la valeur
d'une cellule de cette même feuille, cela doit être faisable.
Merci d'avance !!!
"superpro" a écrit dans le message de news:carlg0$r1g$
Bonjour, j'aimerais nommer automatiquement une feuille d'après la valeur d'une cellule de cette même feuille, cela doit être faisable. Merci d'avance !!!
vg00
Je n'arrive pas à utiliser merci de m'éclaire Gilles
Je n'arrive pas à utiliser merci de m'éclaire
Gilles
Je n'arrive pas à utiliser merci de m'éclaire Gilles
AV
Bonjour, j'aimerais nommer automatiquement une feuille d'après la valeur d'une cellule de cette même feuille, cela doit être faisable.
Quant tu dis automatiquement, ça semble vouloir dire que la chose doit se faire à l'entrée d'une valeur dans la dite-cellule Ex pour la cellule A1 Clic droit sur l'oglet >Visualiser le code > copier/coller le code suivant :
Private Sub Worksheet_Change(ByVal zz As Range) If zz.Address <> "$A$1" Then Exit Sub Application.EnableEvents = False ActiveSheet.Name = [A1] Application.EnableEvents = True End Sub
AV
Bonjour, j'aimerais nommer automatiquement une feuille d'après la valeur
d'une cellule de cette même feuille, cela doit être faisable.
Quant tu dis automatiquement, ça semble vouloir dire que la chose doit se faire
à l'entrée d'une valeur dans la dite-cellule
Ex pour la cellule A1
Clic droit sur l'oglet >Visualiser le code > copier/coller le code suivant :
Private Sub Worksheet_Change(ByVal zz As Range)
If zz.Address <> "$A$1" Then Exit Sub
Application.EnableEvents = False
ActiveSheet.Name = [A1]
Application.EnableEvents = True
End Sub
Bonjour, j'aimerais nommer automatiquement une feuille d'après la valeur d'une cellule de cette même feuille, cela doit être faisable.
Quant tu dis automatiquement, ça semble vouloir dire que la chose doit se faire à l'entrée d'une valeur dans la dite-cellule Ex pour la cellule A1 Clic droit sur l'oglet >Visualiser le code > copier/coller le code suivant :
Private Sub Worksheet_Change(ByVal zz As Range) If zz.Address <> "$A$1" Then Exit Sub Application.EnableEvents = False ActiveSheet.Name = [A1] Application.EnableEvents = True End Sub
