Copier-coller des valeurs dans un autre onglet sous condition

amelise Messages postés 53 Statut Membre -  
Kuartz Messages postés 852 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je travaille sur deux fichiers:
- le fichier 1 d'où j'extraits les données
- le fichier 2 où je les colle

Sur le fichier 1, j'aimerais que dés que dans la colonne K, il y ait un mot précis (je dis n'importe quoi "Matt" par ex), les valeurs des colonnes C, D, F de la même ligne soient copiées dans mon fichier 2. Et j'aimerais pouvoir tirer cette formule sur un gros nombre de cellule dans la colonne K de mon fichier 1.

Est-ce que c'est possible?
Merci pour votre aide!!

1 réponse

  1. Kuartz Messages postés 852 Date d'inscription   Statut Membre Dernière intervention   65
     
    Bonjour,

    Proposition de code VBA :

    Sub Code()
    
    Dim DL As Long
    
    DL = Worsheets("fichier 1.xls").Cells(Application.Rows.Count, 1).End(xlUp).Row
    
    For i = 1 To DL
    
    If Worksheets("fichier 1.xls").Sheets(1).Range("K & i").Value = "Matt" Then
    x = x + 1
    Worksheets("fichier 1.xls").Rows(i).Copy Worksheets("fichier 2.xls").Rows(x)
    End If
    
    Next i
    
    End Sub


    Cordialement.
    0