Macro copie certaines lignes

[diabolos]

Bonjour

Je me casse la tete depuis plusieurs jours pour trouver une macro qui doit faire ces taches:

J'ai un tableau qui contient des donnees
Je souhaite une macro qui copie sur une autre feuille les lignes de ce tableau qui contiennent une donnee particuliere.

C'est un peu comme avec un filtre automatique sauf que je veux obtenir le resultat sur une feuille differente car cela me permettra de faire des calculs statistiques

Merci 🙂

 

[Gringo]

Salut diabolos,

Tu peux faire une boucle pour copier tes données d'une feuille à une autre, quelque chose qui ressemblerait à ca:

dim i as integer
dim j as integer

j=1
For i=1 to le nombre que tu veux
If cells(i,x).value=valeur recherchée then
'x ici est le numéro de la colonne dans laquelle tes valeurs recherchées sont
Rows(i).select
Selection.copy
Sheets('Feuil2').select
cells(j,1).select
activesheet.paste
j=j+1
End if
next i

Ca devrait marcher...

Gringo

 

[Gringo]

Encore moi...

J'avais oublié une ligne juste avant le End if, il faut que tu reviennes à ta feuille initiale, donc

Sheets('Feuil1').select

Bonne journée,

Gringo

 

[AV]

Ave,

''...C'est un peu comme avec un filtre automatique sauf que je veux obtenir le resultat sur une feuille differente...''

La piste du filtre est la meilleure !
Ton enregistreur de macro devrait pas mal t'aider : filtrer ... sélection des cellules visibles (Edition..atteindre...)...copie/collage ailleurs...enlever le filtre

AV [aaa]

 

[diabolos]

je vais essayer les 2 et je vous tiens au courant

merci pour votre aide