Copier-coller lignes sous certaines conditions

Fermé

bob - 10 janv. 2019 à 09:09
Kalissi Messages postés 218 Date d'inscription jeudi 2 mai 2013 Statut Membre Dernière intervention 15 juillet 2019 - 10 janv. 2019 à 20:15

Bonjour, voici mon code. Je voudrais copier-coller les lignes de la feuille 1 pour lesquelles la colonne G est différentes de 1, et pour lesquelles, la colonne B ou C est différente pour un meme groupe de ligne 4 ou 2 ici. Il se peut aussi que pour un groupe de ligne, il y ait les meme B ou C, et auquel cas je ne veux pas prendre ces lignes.

Pourriez vous m'aidez pour la boucle à construire s'il vous plait.

Mon fichier : https://www.cjoint.com/c/IAiskulugsh

Sub tri()
i = 2
While i < 10
If Cells(i, 7) <> 1 And Cells(i, 2) <> Cells(i + 1, 2) Or Cells(i, 3) <> Cells(i + 1, 3) Then

Rows("i:i").Select
Selection.Copy
Sheets("Feuil2").Select
Rows("i:i").Select
ActiveSheet.Paste

End If

Wend

End Sub

Configuration: Windows / Firefox 60.0

A voir également:

Copier-coller lignes sous certaines conditions
Copier coller pdf - Guide
Copier une vidéo youtube - Guide
Super copier - Télécharger - Gestion de fichiers
Copier coller formule excel sans décalage ✓ - Forum Bureautique
Copier coller multiple - Guide

1 réponse

Réponse 1 / 1

Kalissi Messages postés 218 Date d'inscription jeudi 2 mai 2013 Statut Membre Dernière intervention 15 juillet 2019 20
10 janv. 2019 à 20:15

Bonjour

Remplacer :

Rows("i:i").Select
Selection.Copy
Sheets("Feuil2").Select
Rows("i:i").Select
ActiveSheet.Paste

par

Rows("i:i").Select
Selection.Copy
Sheets("Feuil2").Select
Range("I1").Select
ActiveSheet.Paste

Discussions similaires

Dessiner avec son clavier et avec des lettres

Comment faire le signe de croix (chrétiens) ?

dessin au clavier cannabis

Comment faire le symbole coeur vide/coeur blanc

dessin ASCII

Discussions similaires

Newsletters