Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel changer nom onglet au changement de valeur d'une cellule

changer nom onglet au changement de valeur d'une cellule

3 réponses
Avatar
Ramsès
Bonjour à tous,

Je voudrais que le nom de la feuille change automatiquement pour la valeur
de la cellule B5 lorsque la valeur de B5 change.

J'essaie avec Private Sub Worksheet_Change(ByVal Target As Range), mais je
ne sais pas comment spécifier la cellule B5.

Merci de m'aider.

Ramsès
Signaler un problème avec ce contenu

3 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
JulieH
Bonjour,

Si j'ai bien compris la question, cela devrait le faire.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target = [B5] Then
ActiveSheet.Name = [B5].Value
End If
End Sub

Julie

Bonjour à tous,

Je voudrais que le nom de la feuille change automatiquement pour la valeur
de la cellule B5 lorsque la valeur de B5 change.

J'essaie avec Private Sub Worksheet_Change(ByVal Target As Range), mais je
ne sais pas comment spécifier la cellule B5.

Merci de m'aider.

Ramsès


Avatar
JB
Bonjour,

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$B$5" Then
On Error Resume Next
ActiveSheet.Name = Target
End If
End Sub

JB



On 14 jan, 14:37, Ramsès wrote:
Bonjour à tous,

Je voudrais que le nom de la feuille change automatiquement pour la valeur
de la cellule B5 lorsque la valeur de B5 change.

J'essaie avec Private Sub Worksheet_Change(ByVal Target As Range), mais je
ne sais pas comment spécifier la cellule B5.

Merci de m'aider.

Ramsès


Avatar
Ramsès
Merci beaucoup, c'est exactement ce que je cherchais.


Bonjour,

Si j'ai bien compris la question, cela devrait le faire.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target = [B5] Then
ActiveSheet.Name = [B5].Value
End If
End Sub

Julie

Bonjour à tous,

Je voudrais que le nom de la feuille change automatiquement pour la valeur
de la cellule B5 lorsque la valeur de B5 change.

J'essaie avec Private Sub Worksheet_Change(ByVal Target As Range), mais je
ne sais pas comment spécifier la cellule B5.

Merci de m'aider.

Ramsès