Supprimer 3 lignes après un résultat
Mika25
-
Mika25 -
Mika25 -
Bonjour,
j'ai commencé à écrire un bout de macro, mais je bute sur un point. Lorsque le résultat est atteint je voudrais que la macro me supprime la ligne en question et les 3 lignes qui suivent, comment pourrais-je faire ?
Ci-joint mon code :
Sub Essai()
Dim i As Integer
With ThisWorkbook.Sheets("Feuil1")
For i = .Range("c" & .Rows.Count).End(xlUp).Row To 2 Step -1
If .Range("c" & i).Value = "Patate" Then
.Rows(i).Delete
End If
Next i
End With
End Sub
Merci
j'ai commencé à écrire un bout de macro, mais je bute sur un point. Lorsque le résultat est atteint je voudrais que la macro me supprime la ligne en question et les 3 lignes qui suivent, comment pourrais-je faire ?
Ci-joint mon code :
Sub Essai()
Dim i As Integer
With ThisWorkbook.Sheets("Feuil1")
For i = .Range("c" & .Rows.Count).End(xlUp).Row To 2 Step -1
If .Range("c" & i).Value = "Patate" Then
.Rows(i).Delete
End If
Next i
End With
End Sub
Merci
A voir également:
- Supprimer 3 lignes après un résultat
- Supprimer rond bleu whatsapp - Guide
- Supprimer une page word - Guide
- Ai suite 3 - Télécharger - Optimisation
- Impossible de supprimer un fichier - Guide
- Supprimer pub youtube - Accueil - Streaming
