Temps de traitemeent par macro

Re : Temps de traitemeent par macro

pour info je veux supprimer les données correspondantes à la colonne O

Re : Temps de traitemeent par macro

Bonjour philmaure,

A tester :


Tiens nous au courant

Patsyl60

Re : Temps de traitemeent par macro

merci mais je ne m'en sors pas. que dois je mettre en remplacement de "Ton code à supprimer" ?
Je te met ma macro pour aider.
Dim fini&, i&, a&, fini1
fini = Sheets("Flux").Range("C" & Rows.Count).End(xlUp).Row
fini1 = Sheets("Flux").Range("O" & Rows.Count).End(xlUp).Row
For i = fini To 2 Step -1
For a = 1 To fini1
If Sheets("Flux").Cells(i, 3) = Sheets("Flux").Cells(a, 15) Then Sheets("Flux").Range(Sheets("Flux").Cells(i, 1), Sheets("Flux").Cells(i, 6)).Delete Shift:=xlUp: GoTo 5
Next a
5 Next i



Merci

Re : Temps de traitemeent par macro

Re

En fait le simple fait d'ajouter" Application.ScreenUpdating = False" ramène le temps de traitement à quelques secondes. C'est opk pour moi
Un grand merci et bon a-m
Cdlt
philippe