extraction de 2 lignes selon critéres

  • Auteur de la discussion vince
  • Date de début
V

vince

Guest
bonsoir

A partir du fichier exemple çi-joint je souhaite extraire selon la méthode la + rapide (filtre élaboré ou VBA )2 lignes selon certains critères.Le fichier final est volumineux 45000 lignes à traiter .

merci de votre aide

vonce [file name=test_20060511202959.zip size=2806]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/test_20060511202959.zip[/file]
 

Fichiers joints

porcinet82

XLDnaute Barbatruc
Salut Vince,

Apres quelques jours passés loind du forum, je reppase faire un petit tour et donc j'en profite pour essayer de t'apporter une solution, meme si je ne suis pas sur que ce sera la meilleur ou la plus rapide.

Voici le code la macro que je te propose :
Code:
Sub test()
Dim i As Double

Sheets('tb').Select
For i = 2 To Range('A65536').End(xlUp).Row
    If Not Cells(i, 1).Value = Cells(i + 1, 1).Value Then
        With Sheets('Feuil1')
            .Range('A65536').End(xlUp).Offset(1, 0).Value = Cells(i - 1, 1).Value
            .Range('B65536').End(xlUp).Offset(1, 0).Value = Cells(i - 1, 2).Value
            .Range('A65536').End(xlUp).Offset(1, 0).Value = Cells(i, 1).Value
            .Range('B65536').End(xlUp).Offset(1, 0).Value = Cells(i, 2).Value
        End With
    End If
Next i
End Sub
@+
 

SergiO

XLDnaute Accro
Bonsoir Vince, Porcinet82

J'ai essayé le code de Porcinet et j'ai constaté une erreur (Voir Feuil1) mais ne sachant pas la corriger, je lui laisse le soin de le faire.

Si un article se trouve seul au milieu de la base, cela génère égalemnt un résultat erroné.

J'ai laissé ma solution version macro excel 4.0 pour info.

@+ [file name=Extraction_Vince.zip size=10990]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Extraction_Vince.zip[/file]
 

Fichiers joints

P

perdinch

Guest
merci ca marche bien

est il possible EN plus du filtre effectué par la macro de récupérer le contenu des colonnes C à G qui contiennent aussi des données et que je n'ai pas évoqué initialement ?

cordialement

perdinch
 
A

AV

Guest
Ave,

Avis perso : vu le nombre de lignes annoncé et la possiblité (ultérieure ?) de données non triées, il faut exclure les solutions passant par des boucles et s'orienter vers les filtres (imbattables sur des grandes bases)

AV [aaa] [file name=DeuxMeilleursDeChaque.zip size=9346]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/DeuxMeilleursDeChaque.zip[/file]
 

Fichiers joints

V

vince

Guest
merci de votre aide .
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas