Discussion :

[binouse18]

Bonjour je suis à la recherche d'un code VBA sous excel et j'aurais besoin d'un petit coup de main.
Voila je travaille sur 2 feuilles:
Dans la feuille 1 j'ai un tableau de 8 colonnes et 102 lignes. Pour les lignes où dans la colonne 1 il y a écrit paul et dans la colonne 2 Jean. Je veux que la valeur de la cellule de la collone 3 soit recopier dans la plage de cellule A1:A8 de la deuxième feuille
Il peut y avoir plusieurs lignes qui répondent à ces critères.

Merci à tous

[jfontaine]

tu dis

Il peut y avoir plusieurs lignes qui répondent à ces critères

est ce que ca signifie que chaque ligne, que l'on trouve exact, doit écraser le résultat de la précédente?

[binouse18]

Non justement il faut que chaque réponse s'inscrive en dessous de l'autre dans la feuille 2 dans la plage A1:A8

[jfontaine]

Ce code fonctionne. en espérant qu'il fasse ce que tu veux
IL suffit de l'insérer dans le code de la feuil qui contient ton tableau

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
18
19
20
 
Sub test()
Dim i As Integer
Dim li As Byte 'garde en mémoire la ligne a alimenté sur feuil2
 
li = 1
 
For i = 1 To 102
 
    If Me.Range("A" & i).Value = "paul" And Me.Range("B" & i).Value = "jean" Then
 
        Sheets("Feuil2").Range("A" & li).Value = Me.Range("C" & i).Value
        li = li + 1
    End If
 
 
Next i
 
 
End Sub

[binouse18]

Je l'ai un peu modifier pour que ça convienne à mon aplication ça marche super bien je te remercie c'est parfait