Comment renommer une colonne avec VBA

strikas06 Messages postés 22 Statut Membre -  
strikas06 Messages postés 22 Statut Membre -
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.

2 réponses

  1.
    michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour

    Tu es sûr de vouloir utiliser VBA pour faire cela alors qu'avec un simple rechercheV ...... ?
    0
  2. strikas06 Messages postés 22 Statut Membre
     
    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!
    0
    1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
       
      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)
      0
    2. strikas06 Messages postés 22 Statut Membre
       
      :))))

      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 ;)
      0
    3. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
        
      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
      0
    4. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
       
      je vais rajouter à peu près 100 lignes à mon tableau

      ???? non précisé au départ : tu m'inquiètes.....
      0
    5. strikas06 Messages postés 22 Statut Membre
       
      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!
      0

Discussions similaires

renommer un lien internet
brian johnson -
pilou67000 -

1 réponse
comment changer le nom d'un lien?
nina20 -
MattisFreeman -

17 réponses