BONJOUR
Comment fait-on pour changer le nom de colonne a l'aide de macro vba?
par exemple j'ai une colonne qui est "conventions collectives" que j'aimerai remplacer par "libelle_ccn"
comment puis-je faire ?
merci
BONJOUR
Comment fait-on pour changer le nom de colonne a l'aide de macro vba?
par exemple j'ai une colonne qui est "conventions collectives" que j'aimerai remplacer par "libelle_ccn"
comment puis-je faire ?
merci
Pourquoi ne pas le faire avec le gestionnaire de noms
Tu peux faire enregistrer une macro
atteindre la zone à renommer
supprimer la zone que tu veux renommer
créer la zone avec le nouveau nom
arrêter l'enregistrement
Tu auras presque le code à utiliser.
ou :
"conventions collectives" n'est pas conforme "pas d'espace dans un nom...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Sub Renomme_Nom() Dim AncienNom As String, NouveauNom As String Dim Cible As String AncienNom = "conventionscollectives" NouveauNom = "libelle_ccn" 'Récupère l'adresse de la cellule ou la plage nommée. Cible = Range(AncienNom).Name 'Supprime le nom Range(AncienNom).Name.Delete 'Renomme la plage initiale Range(Cible).Name = NouveauNom End Sub
merci et du coup comment mettre un "_" pour conventions_collectives ?
ca ne fonctionne pas :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Sub Renomme_Nom() Dim AncienNom As String, NouveauNom As String Dim Cible As String AncienNom = "conventionscollectives" NouveauNom = "libelle_ccn" 'Récupère l'adresse de la cellule ou la plage nommée. Cible = Range(A1).Name 'Supprime le nom Range(A1).Name.Delete 'Renomme la plage initiale Range(A1).Name = NouveauNom End Sub
cherche un peu....
je pense que c'est normal.
Bonjour, pensez a bien vérifiez l'orthographe des noms.
Cordialement
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Sub Renomme_Nom() Dim AncienNom As String, NouveauNom As String Dim Cible As String AncienNom = "conventionscollectives" NouveauNom = "libelle_ccn" 'Récupère l'adresse de la cellule ou la plage nommée. Cible = Range("A1").Name 'Supprime le nom Range("A1").Name.Delete 'Renomme la plage initiale Range("A1").Name = NouveauNom End Sub
On a deux vies, la deuxième commence quand on se rend compte qu'on n'en a qu'une.
Confucius
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager