OVH Cloud OVH Cloud

recoupement entre deux feuilles

4 réponses
Avatar
jp
Bonjour,



J'ai deux feuilles excel. Dans la première feuille (colonne A), il y a des
codes et d'autres infos dans les autres colonnes (sauf la colonne B).



Dans la deuxième feuille, j'ai les mêmes codes (dans un ordre différents)
que la première feuille. Dans la colonne B, il y a des noms. (associés aux
codes de la colonne A de la deuxième feuille)



Ma question est : Comment puis je faire pour que dans la colonne B de ma
première feuille, j'insère les infos de la deuxième feuille. (en utilisant
la correspondance des codes)



Si vous avez une tite idée...



Exemple :

Feuille 1

123

28

255

58



feuille 2 :



58 pif

28 paf

123 pof

255 puf





Je veux obtenir :

123 pof

28 paf

255 puf

58 pif

4 réponses

Avatar
Alain CROS
Bonjour.

En B1 de Feuil1
=INDEX(Feuil2!B$1:B$10;EQUIV(A1;Feuil2!A$1:A$10;0))
Puis tu tire vers le bas.

Alain CROS.

"jp" a écrit dans le message de news: bem49k$mjl$
Bonjour,



J'ai deux feuilles excel. Dans la première feuille (colonne A), il y a des
codes et d'autres infos dans les autres colonnes (sauf la colonne B).



Dans la deuxième feuille, j'ai les mêmes codes (dans un ordre différents)
que la première feuille. Dans la colonne B, il y a des noms. (associés aux
codes de la colonne A de la deuxième feuille)



Ma question est : Comment puis je faire pour que dans la colonne B de ma
première feuille, j'insère les infos de la deuxième feuille. (en utilisant
la correspondance des codes)



Si vous avez une tite idée...



Exemple :

Feuille 1

123

28

255

58



feuille 2 :



58 pif

28 paf

123 pof

255 puf





Je veux obtenir :

123 pof

28 paf

255 puf

58 pif





Avatar
Jack
Hello jp. !

Feuille1 : codes en A1:A4
Feuille1 : colonne B vide

Feuille2 : codes en A1:A4
Feuille2 : noms

Soluce :

En Feuille1, Cellule B1 écrire la formule :

=RECHERCHEV(A1;Feuil2!$A$1:$B$7;2)

tu peux ensuite copier la formule sur toutes les cellules
de la colonne B de la feuille 1.

Chez-moi ça marche !

Bon après-midi !

Jack
-----Message d'origine-----
Bonjour,



J'ai deux feuilles excel. Dans la première feuille
(colonne A), il y a des

codes et d'autres infos dans les autres colonnes (sauf la
colonne B).




Dans la deuxième feuille, j'ai les mêmes codes (dans un
ordre différents)

que la première feuille. Dans la colonne B, il y a des
noms. (associés aux

codes de la colonne A de la deuxième feuille)



Ma question est : Comment puis je faire pour que dans la
colonne B de ma

première feuille, j'insère les infos de la deuxième
feuille. (en utilisant

la correspondance des codes)



Si vous avez une tite idée...



Exemple :

Feuille 1

123

28

255

58



feuille 2 :



58 pif

28 paf

123 pof

255 puf





Je veux obtenir :

123 pof

28 paf

255 puf

58 pif



.



Avatar
jp
OK merci ca marche !!!

"Jack" a écrit dans le message de news:
089601c347a3$36c1d5a0$
Hello jp. !

Feuille1 : codes en A1:A4
Feuille1 : colonne B vide

Feuille2 : codes en A1:A4
Feuille2 : noms

Soluce :

En Feuille1, Cellule B1 écrire la formule :

=RECHERCHEV(A1;Feuil2!$A$1:$B$7;2)

tu peux ensuite copier la formule sur toutes les cellules
de la colonne B de la feuille 1.

Chez-moi ça marche !

Bon après-midi !

Jack
-----Message d'origine-----
Bonjour,



J'ai deux feuilles excel. Dans la première feuille
(colonne A), il y a des

codes et d'autres infos dans les autres colonnes (sauf la
colonne B).




Dans la deuxième feuille, j'ai les mêmes codes (dans un
ordre différents)

que la première feuille. Dans la colonne B, il y a des
noms. (associés aux

codes de la colonne A de la deuxième feuille)



Ma question est : Comment puis je faire pour que dans la
colonne B de ma

première feuille, j'insère les infos de la deuxième
feuille. (en utilisant

la correspondance des codes)



Si vous avez une tite idée...



Exemple :

Feuille 1

123

28

255

58



feuille 2 :



58 pif

28 paf

123 pof

255 puf





Je veux obtenir :

123 pof

28 paf

255 puf

58 pif



.



Avatar
André
Simple (simpliste ?) mais ça tourne :

Sub CopierBdansB()
Dim C1 As Range
Dim C2 As Range
Dim C3 As Range
Dim Tab1() As String
Dim Tab2() As String
Dim i As Long
ThisWorkbook.Worksheets("Feuil2").Activate
i = [A120:A124].Count
ReDim Tab1(i)
For Each C1 In ActiveSheet.[A120:A124]
Tab1(i) = C1
i = i - 1
Next C1
i = ActiveSheet.[B120:B124].Count
ReDim Tab2(i)
For Each C2 In ActiveSheet.[B120:B124]
Tab2(i) = C2
i = i - 1
Next C2
'contrôle des tableaux :
'For i = 5 To 1 Step -1
'MsgBox (Tab1(i) & vbCr & Tab2(i))
'Next i
ThisWorkbook.Worksheets("Feuil1").Activate
i = [B120:B124].Count
For i = i To 1 Step -1
For Each C3 In ActiveSheet.[B120:B124]
If Tab1(i) = C3.Offset(0, -1) Then
C3 = Tab2(i)
End If
Next C3
Next i
End Sub

André