Copier sous condition que le contenue soit >0

Résolu
TraderAS Messages postés 119 Statut Membre -  
TraderAS Messages postés 119 Statut Membre -
Bonjour,

je souhaite copier une ligne de cellule a condition que que le contenu de l'une de ces cellules soit supérieur à 0

Merci

2 réponses

  1. pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 773
     
    Bonjour,

    Je te l'offre avec une boucle...
    Dim i& 
    
    For i = 1 to 10 
        'Si cellule en colonne 1 est sup à 0 alors on copies la ligne
        If Cells(i, 1) > 0 Then Rows(i).Copy  
    Next i

    Si si c'est cadeau, ça fait plaisir!
    Cordialement,
    Franck P
    0
  2. TraderAS Messages postés 119 Statut Membre 1
     
    encore une fois merci ;)
    0