Nom de feuille
Résolu
ced5757
Messages postés
40
Statut
Membre
-
ced5757 Messages postés 40 Statut Membre -
ced5757 Messages postés 40 Statut Membre -
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
- Annuaire portable gratuit a partir d'un nom ✓ - Forum Mobile
- Feuille diddl la plus rare ✓ - Forum Graphisme
- Feuille de score belote excel - Forum Graphisme
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
