Bonjour a tous,
J'ai une problématique dans mon fichier Excel dans lequel je voudrais supprimer certaines lignes qui ne répondent pas a quelques critères:
Mon fichier Excel comporte 7 colonnes. Je voudrais garder uniquement les données pour lesquelles la valeur de la colonne F est comprise entre 60 et 80, si c'est le cas alors on garde les 2 lignes formant la même famille (colonne E) et la même position (colonne A), le reste on supprime.
J'ai tenté de commencer une macro, je n'arrive pas avancer, mes compétences en macro Excel me font défaut .
J'ai commencé a ecrire ce code, mais je galere, si quelqu'un peut m'aider
Merci.
J'ai une problématique dans mon fichier Excel dans lequel je voudrais supprimer certaines lignes qui ne répondent pas a quelques critères:
Mon fichier Excel comporte 7 colonnes. Je voudrais garder uniquement les données pour lesquelles la valeur de la colonne F est comprise entre 60 et 80, si c'est le cas alors on garde les 2 lignes formant la même famille (colonne E) et la même position (colonne A), le reste on supprime.
J'ai tenté de commencer une macro, je n'arrive pas avancer, mes compétences en macro Excel me font défaut .
J'ai commencé a ecrire ce code, mais je galere, si quelqu'un peut m'aider
Code:
Sub SupprimerLigne()
Dim DerLig As Long
min=60
max=80
Derlig = Cells(Rows.Count, 1).End(xlUp).Row
For lignes = DerLig To 2 Step -1
If WorksheetFunction.CountIf(Range("A2:A" & DerLig), Range("F2:F").Value < max And Range("F2:F").Value > min, Range("A" & lignes)) = 1 And Range("E" & lignes) = 1 Then
Rows(lignes).Delete
End If
Next lignes
End Sub
Merci.