bonsoir ;
j'ai deux feuille l'une contient un tableau de références présenté comme suit :
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
17
Reference	Description
1	          PC HP
2	          PC DELL
3	          PC SONY
4	          PRINTER LASER HP
5	          PRINTER JET HP
6	          PRINTER LEXMARK
7	          ECRANT 17
8	          ECRANT LCD 17
9	          PROSS M2.4
10	          PROSS DUO1.7
11	          PROSS AMD
12	          PROSS CENTRINO
13	          DDRAM 512M
14	          DDRAM 1G
15	          DDRAM 2G
16	          DDRAM 4G
la deuxieme feuille contient un tableau présenté comme suit :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
Fréquences	Quantité	Description
2	            1	
3	            2	
3	            1	
5	            3	
6	            2
mon but est de faire une recherche en fonction d'une macro; j'ai essayé d'écrire deux programmes mais les deux ne fonctionnent pas :
programme 1 :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub recherche()
Dim i As Integer
Dim j As Integer
i = 0
j = 0
Do While Range("facture!A2").Offset(i) <> Range("ref!A2").Offset(i)
i = i + 1
j = j + 1
Loop
Range("facture!C2").Offset(i) = Range("ref!Bj").Offset(i)
End Sub
programme 2 :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 Sub rech()
Dim i As Integer
i = 0
Range("facture!C2").Offset(i) = Range("ref!RECHERCHE(A2;ref!$A$2:$A$17;ref!$B$2:$B$17)")
End Sub
pouvez vous m'aider ?
merci d'avance .