Simplification macro

Bonjour

j'ai créé une macro en utilisant la fonction enregistrer, cependant le résultat n'est pas parfait.

Ma macro doit sur un onglet spécifique :

supprimer la 1ere ligne de l'onglet

supprimer les lignes dont la colonne U est vide

supprimer les doublons liés à la colonne A

Tout ceci quelque soit le nombre de ligne à traiter : de 1 à XXXXX

Bonjour,

Cela doit donner quelque chose comme ceci :

Sub simpli_onglet_charge()

Sheets("Charge Par Article").Select
Rows("1:1").Delete Shift:=xlUp

With ActiveSheet.Range("A2:U" & Range("A1048576").End(xlUp).Row)
    .Select
    .AutoFilter Field:=21, Criteria1:="="
    .EntireRow.Delete
    .AutoFilter
    .RemoveDuplicates Columns:=1, Header:=xlYes
End With

Cells(1, 1).Activate
Sheets("planning").Select
End Sub

Tu filtrais sur la colonne T, j'ai changé pour U, ça paraissait plus logique vu tes explications.

Bonjour

Bonjour à tous

Une variante.

Bye !

Solution plus évolutive, c'est certain. Un peu plus galère en pas à pas cela dit

Bonjour

merci à vous 2, les 2 solutions fonctionnent j'ai pris la solution de joyeuxNoel car je comprends mieux le cheminement.

Rechercher des sujets similaires à "simplification macro"