Discussion :

[flavionnais]

Bonjour,
n'ayant aucune connaissance sur VBA je vous sollicite.

Je voudrai créer un programme qui me permette de transferer chaques colonnes de la feuille 1 vers la feuille 2 sachant que toutes les colonnes de la feuille 1 ne sont pas dans le même ordre,c'est pour cela que je voudrai utiliser une fonction de recherche. La feuille 2 est toujours disposé de la même manière.

le programme:
-rechercherai l'intitulé de la colonne (en feuille 1)
-copie le contenu de cette colonne
-colle la plage selectionné dans la bonne colonne sur la feuille 2

(l'intitulé des colonnes est le même sur les 2 feuilles par exemple : code_produit, libellé_produit etc). La ligne 1 est donc occupé par la liste de tous les intitulés.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub Macro1()
 
 Sheets("Feuil1").Select
    Cells.Find(What:="Code", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
        False, SearchFormat:=False).Activate
    Range("A2:A41").Select
    Selection.Copy
   Sheets("Feuil2").Select
    Cells.Find(What:="CODE_PRO", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
    Range("A2").Select
    ActiveSheet.Paste
 
End Sub

voici un essai avec "Code"

quel programme faire pour que le contenu de chaque colonne soit recherché et transféré directement sur l'autre feuille ?

Merci d'avance

[mathspountz]

Bonjour,

Je ne sais pas si ça répondrait à tes besoins mais ce que tu veux faire est faisable sans macro, ce qui à l'avantage d'être opérationnel en temps réel. Dès que tu change quelque chose dans la première feuille, le changement s'opérera également dans la deuxième.

Tu peux utiliser la fonction/formule "RECHERCHEH" d'excel.

Regarde l'exemple ici, tu devrais comprendre : http://office.microsoft.com/fr-fr/ex...010062411.aspx