Nom de feuille
Résolu
ced5757
Messages postés
40
Date d'inscription
Statut
Membre
Dernière intervention
-
ced5757 Messages postés 40 Date d'inscription Statut Membre Dernière intervention -
ced5757 Messages postés 40 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'aimerai lier une cellule au nom de ma feuille .
c'est dire que lorsque j'écris un nom dans ma cellule ma feuille se nomme automatiquement avec ce nom.
Merci d'avance
J'aimerai lier une cellule au nom de ma feuille .
c'est dire que lorsque j'écris un nom dans ma cellule ma feuille se nomme automatiquement avec ce nom.
Merci d'avance
A voir également:
- Nom de feuille
- Bruler feuille de laurier - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Feuille diddl la plus rare ✓ - Forum Graphisme
- Nom de l'adresse - Forum Jeux vidéo
- Nom de compte steam exemple - Forum Jeux vidéo
3 réponses
Bonjour,
Je pense qu'il faut passer par une macro.
Voici une proposition qui renomme la 2ème feuille du classeur (Sheets(2)) en fonction de la valeur de la cellule A1 de la feuille courante :
---------------------
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub
Sheets(2).Name = ActiveSheet.[A1].Value
End Sub
---------------------
N'hésitez pas si vous avez besoin de précisions.
Bonne journée !
Je pense qu'il faut passer par une macro.
Voici une proposition qui renomme la 2ème feuille du classeur (Sheets(2)) en fonction de la valeur de la cellule A1 de la feuille courante :
---------------------
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub
Sheets(2).Name = ActiveSheet.[A1].Value
End Sub
---------------------
N'hésitez pas si vous avez besoin de précisions.
Bonne journée !
Bonjour
A copier dans le module de la feuille
j'ai pris comme cellule de référence la cellule A1,
pour valider, la saisie, cliquez une fois dans une autre cellule, puis à nouveau dans la cellule A1. la feuille prendra le nom du contenu de la cellule
Cdlt
A copier dans le module de la feuille
Private Sub Worksheet_SelectionChange(ByVal sel As Range)
If sel.Address <> "$A$1" Then Exit Sub
ActiveSheet.Name = sel.Value
End Sub
j'ai pris comme cellule de référence la cellule A1,
pour valider, la saisie, cliquez une fois dans une autre cellule, puis à nouveau dans la cellule A1. la feuille prendra le nom du contenu de la cellule
Cdlt