Comment renommer une colonne avec VBA

Fermé

strikas06 Messages postés 21 Date d'inscription mercredi 24 octobre 2012 Statut Membre Dernière intervention 6 novembre 2012 - 31 oct. 2012 à 14:33
strikas06 Messages postés 21 Date d'inscription mercredi 24 octobre 2012 Statut Membre Dernière intervention 6 novembre 2012 - 31 oct. 2012 à 15:50

Bonjour à tous,

débutant en excel, j'aurai voulu savoir comment remplacer les valeurs d'une colonnes par des valeurs qui leurs sont attachées. Par exemple, dans ma première colonne j'ai les valeurs 1,2,3,4,5,6,7,8,9 et ces numéros correspondent à des noms d'élèves RESPECTIFS.

En effet dans un autre fichier (2) j'ai ma Sheet1 avec en colonne A les valeurs 1,2,3,4,5,6,7,8,9 et dans le meme ordre j'ai dans la colonne B des noms d'élèves.

Je voudrais un macro qui va remplacer (dans mon premier fichier) les numéros par les noms associés en allant chercher dans le feuille 1 de mon deuxième fichier la correspondance.

C'est un peu compliqué mais assez intéressant à faire! Mais chui trop mauvais encore pour le faire tout seul...

Merci pour tout aide, bonne journée à tous.

A voir également:

Comment renommer une colonne avec VBA
Déplacer une colonne excel - Guide
Renommer plusieurs fichiers en même temps - Guide
Formule somme excel colonne - Guide
Trier colonne excel - Guide
Colonne word - Guide

2 réponses

Réponse 1 / 2

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
31 oct. 2012 à 14:45

Bonjour

Tu es sûr de vouloir utiliser VBA pour faire cela alors qu'avec un simple rechercheV ...... ?

Réponse 2 / 2

strikas06 Messages postés 21 Date d'inscription mercredi 24 octobre 2012 Statut Membre Dernière intervention 6 novembre 2012
31 oct. 2012 à 14:59

Salut Michel!

Oui en fait en utilisant une macro ça me permettra de faire ça plus rapidement au lieu de tirer la formule à chauqe fois... Etça prendra moins de^place dans mon fichier :).

Merci de t'intéresser à ma question en tout cas!

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
31 oct. 2012 à 15:29

Excuse moi d'insister mais tu écris la formule dans la colonne sur la ligne du premier numéro et tu doubles clic sur le carré noir en bas et à droite de la cellule.

Ca prendra moins de poids si ton classeur dépasse les 2 Mo sinon, le gain est faible

Bon, je fais te faire un truc en vba puisque ca a l'air une question de vie ou de mort; un peu de patience
;o)

strikas06 Messages postés 21 Date d'inscription mercredi 24 octobre 2012 Statut Membre Dernière intervention 6 novembre 2012
31 oct. 2012 à 15:41

:))))

Merci beaucoup Michel! En fait le classeur que je vais faire va peser très lourd puisque chaque jour je vais rajouter à peu près 100 lignes à mon tableau et il doit durer sur toute la période 2013... il pèsera plus que 2Mo je pense.

Merci beaucoup! Bien sur que je serai patient ;)

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
31 oct. 2012 à 15:42

Sub macro_pour_faire_plaisir_quand_même()
Dim Fin As Integer, Cptr As Integer

With Sheets(2)
     Fin = .Columns("A").Find("*", , , , , xlPrevious).Row
     T_liste = .Range("A2:B" & Fin).Value
End With


Sheets(1).Range("A2").Resize(UBound(T_liste), 2) = T_liste

End Sub

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
31 oct. 2012 à 15:45

je vais rajouter à peu près 100 lignes à mon tableau

???? non précisé au départ : tu m'inquiètes.....

strikas06 Messages postés 21 Date d'inscription mercredi 24 octobre 2012 Statut Membre Dernière intervention 6 novembre 2012
31 oct. 2012 à 15:50

Oui je sais... La tache qu'on m'a confiée est tellement longue à expliquer que je pouvais pas tout décrire dans le message malheureusement :(. Merci beaucoup michel! Je vais essayer d'intégrer cette macro dans le mienne!

Discussions similaires

Renommer un contact sur insta

"L'indice n'appartient à la sélection" + VBA

Excel VBA : Derniere colonne utilisée