Nom de feuille
Résolu/Fermé
ced5757
Messages postés
40
Date d'inscription
mercredi 8 mai 2013
Statut
Membre
Dernière intervention
20 mai 2013
-
10 mai 2013 à 10:46
ced5757 Messages postés 40 Date d'inscription mercredi 8 mai 2013 Statut Membre Dernière intervention 20 mai 2013 - 10 mai 2013 à 17:53
ced5757 Messages postés 40 Date d'inscription mercredi 8 mai 2013 Statut Membre Dernière intervention 20 mai 2013 - 10 mai 2013 à 17:53
A voir également:
- Nom de feuille
- Trouver un numéro de portable avec un nom ✓ - Forum Mobile
- Feuille de pointage excel - Télécharger - Tableur
- Trouver une adresse avec un nom de famille gratuit ✓ - Forum Mobile
- Trouver un nom avec une adresse ✓ - Forum Loisirs / Divertissements
- Le nom du champ de tableau croisé dynamique n'est pas valide ✓ - Forum Excel
3 réponses
.Grincheux.
Messages postés
211
Date d'inscription
vendredi 10 mai 2013
Statut
Membre
Dernière intervention
22 octobre 2016
84
10 mai 2013 à 11:05
10 mai 2013 à 11:05
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 !
Frenchie83
Messages postés
2240
Date d'inscription
lundi 6 mai 2013
Statut
Membre
Dernière intervention
11 août 2023
338
10 mai 2013 à 11:10
10 mai 2013 à 11:10
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
ced5757
Messages postés
40
Date d'inscription
mercredi 8 mai 2013
Statut
Membre
Dernière intervention
20 mai 2013
1
10 mai 2013 à 17:53
10 mai 2013 à 17:53
merci a vous deux ça marche très bien
Bonne journée !
Bonne journée !