Supprimer des lignes qui commencent par une donnée précise à l'aide d'une macro

Bonjour,

je veux faire une macro qui me permettra de supprimer des lignes sous deux conditions:
condition 1 : les données de la colonne C qui commencent par 401
condition 2 : les données de la colonne F qui sont différente de F et R
Pourriez vous m'aider SPV ?
Mercii d'avance

Bonjour,

il manque quelques éléments pour bien comprendre
en l'état, je subodore que les données commencent en ligne 2 car la ligne 1 contient des en-têtes et que:

1) on cherche la première ligne dont la cellule de la colonne C commence par "401" (une chiffre ou une chaine de caractère ? dans une formule ou dans une valeur ? J'opte pour la chaine dans une valeur de cellule)
2) de cette ligne là incluse, et pour toutes les lignes du dessous, on supprime chaque ligne où la cellule de la colonne F est différente de R et de F à la fois


La fonction FIND permet de trouver la cellule du premier point

Le filtre automatique placé en colonne F, utilisant les 2 Criteria en association va masquer les lignes contenant R et F
On part de la cellule du premier point, on sélectionne tout ce qui est en dessous et qui est "visible" sur la feuille, pour en supprimer les lignes intégrales

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sub toto() Dim Cell As Range With Feuil1.Cells(1, 1).CurrentRegion Set Cell = .Columns(3).Find("401*", , , xlPart) If Not Cell Is Nothing Then .AutoFilter: .AutoFilter 6, "<>R", xlAnd, "<>F" If .Offset(1, 0).SpecialCells(xlCellTypeVisible).Rows.Count > 1 Then .Offset(Cell.Row - 1, 0).Resize(.Rows.Count - Cell.Row + 1, 1).SpecialCells(xlCellTypeVisible).EntireRow.Delete End If .AutoFilter End If End With End Sub

---

Bonne adaptation, c'est très brut

EDIT : une petite sécurité si aucun résultat lors de la phase 2

Bonjour
merci pour votre réponse
mais je crois que j'ai mal exprimé ce que je veux
en fait la macro doit supprimer les lignes sur lesquelles les cellules de la colonnes C commmencent par "401" et les cellules de colonnes F ou leurs valeur est différene de R et F

Bonjour,

le B-A-BA : Les filtres avancés ou élaborés dans Excel …

_________________________________________________________________________________________________________

Je suis Paris, Nice, Bruxelles, Charlie, …

Bonjour,

oui pour le filtre avancé, clairement plus rapide :

1) on exporte le resultat souhaité
2) on supprime l'ancienne feuille