Dans un tableau excel, j'aimerai supprimer en automatique toutes les lignes
dont la valeur de la colonne A qui commencent par un Z
J'aimerai également supprimer toutes les lignes qui ont comme valeur O dans
la colonne I.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Nicolas B.
Salut Arnaud,
Essaie ceci (sensible à la casse) :
Sub SuppLignes() Dim i As Integer For i = [A65536].End(xlUp).Row To 1 Step -1 If Left(Cells(i, 1), 1) = "Z" Or Cells(i, 9) = "O" _ Then Cells(i, 1).EntireRow.Delete Next End Sub
A+ Nicolas B.
arnaud wrote:
Bonjour à tous
Dans un tableau excel, j'aimerai supprimer en automatique toutes les lignes dont la valeur de la colonne A qui commencent par un Z J'aimerai également supprimer toutes les lignes qui ont comme valeur O dans la colonne I.
Merci de vos lumières Arnaud
Salut Arnaud,
Essaie ceci (sensible à la casse) :
Sub SuppLignes()
Dim i As Integer
For i = [A65536].End(xlUp).Row To 1 Step -1
If Left(Cells(i, 1), 1) = "Z" Or Cells(i, 9) = "O" _
Then Cells(i, 1).EntireRow.Delete
Next
End Sub
A+
Nicolas B.
arnaud wrote:
Bonjour à tous
Dans un tableau excel, j'aimerai supprimer en automatique toutes les lignes
dont la valeur de la colonne A qui commencent par un Z
J'aimerai également supprimer toutes les lignes qui ont comme valeur O dans
la colonne I.
Sub SuppLignes() Dim i As Integer For i = [A65536].End(xlUp).Row To 1 Step -1 If Left(Cells(i, 1), 1) = "Z" Or Cells(i, 9) = "O" _ Then Cells(i, 1).EntireRow.Delete Next End Sub
A+ Nicolas B.
arnaud wrote:
Bonjour à tous
Dans un tableau excel, j'aimerai supprimer en automatique toutes les lignes dont la valeur de la colonne A qui commencent par un Z J'aimerai également supprimer toutes les lignes qui ont comme valeur O dans la colonne I.
Merci de vos lumières Arnaud
arnaud
Super !! Merci beaucoup !
"Nicolas B." a écrit dans le message de news: #
Salut Arnaud,
Essaie ceci (sensible à la casse) :
Sub SuppLignes() Dim i As Integer For i = [A65536].End(xlUp).Row To 1 Step -1 If Left(Cells(i, 1), 1) = "Z" Or Cells(i, 9) = "O" _ Then Cells(i, 1).EntireRow.Delete Next End Sub
A+ Nicolas B.
arnaud wrote:
Bonjour à tous
Dans un tableau excel, j'aimerai supprimer en automatique toutes les lignes
dont la valeur de la colonne A qui commencent par un Z J'aimerai également supprimer toutes les lignes qui ont comme valeur O dans
la colonne I.
Merci de vos lumières Arnaud
Super !!
Merci beaucoup !
"Nicolas B." <nicolas.bruot@adresse.bidon.invalid> a écrit dans le message
de news: #uyynEoiEHA.3664@TK2MSFTNGP12.phx.gbl...
Salut Arnaud,
Essaie ceci (sensible à la casse) :
Sub SuppLignes()
Dim i As Integer
For i = [A65536].End(xlUp).Row To 1 Step -1
If Left(Cells(i, 1), 1) = "Z" Or Cells(i, 9) = "O" _
Then Cells(i, 1).EntireRow.Delete
Next
End Sub
A+
Nicolas B.
arnaud wrote:
Bonjour à tous
Dans un tableau excel, j'aimerai supprimer en automatique toutes les
lignes
dont la valeur de la colonne A qui commencent par un Z
J'aimerai également supprimer toutes les lignes qui ont comme valeur O
dans
Sub SuppLignes() Dim i As Integer For i = [A65536].End(xlUp).Row To 1 Step -1 If Left(Cells(i, 1), 1) = "Z" Or Cells(i, 9) = "O" _ Then Cells(i, 1).EntireRow.Delete Next End Sub
A+ Nicolas B.
arnaud wrote:
Bonjour à tous
Dans un tableau excel, j'aimerai supprimer en automatique toutes les lignes
dont la valeur de la colonne A qui commencent par un Z J'aimerai également supprimer toutes les lignes qui ont comme valeur O dans
