J'utilise cette formule (trouver sur Disciplus Simplex) pour remonter un
tableau et supprimer les lignes dont la colonne 1 est vide.
For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To 1
Step -1
If Cells(lin, 1) = " " Then Rows(lin).Delete shift:=xlUp
Next lin
Existe t-il une possibilité de supprimer les lignes mais à partir de la
condition de la colonne 2.
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
Stephane
Salut ,
oui , avec cela
For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To 1 Step -1 If Cells(lin, 2) = " " Then Rows(lin).Delete shift:=xlUp Next lin
a+ Steph
"Comres.metz" a écrit dans le message de news:42ce4630$0$17467$
Bonjour à toutes et à tous,
J'utilise cette formule (trouver sur Disciplus Simplex) pour remonter un tableau et supprimer les lignes dont la colonne 1 est vide. For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To 1
Step -1 If Cells(lin, 1) = " " Then Rows(lin).Delete shift:=xlUp Next lin
Existe t-il une possibilité de supprimer les lignes mais à partir de la condition de la colonne 2.
Merci d'avance.
Salut ,
oui , avec cela
For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To 1
Step -1
If Cells(lin, 2) = " " Then Rows(lin).Delete shift:=xlUp
Next lin
a+
Steph
"Comres.metz" <comres.metz@gendarmerie.net> a écrit dans le message de
news:42ce4630$0$17467$8fcfb975@news.wanadoo.fr...
Bonjour à toutes et à tous,
J'utilise cette formule (trouver sur Disciplus Simplex) pour remonter un
tableau et supprimer les lignes dont la colonne 1 est vide.
For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To
1
Step -1
If Cells(lin, 1) = " " Then Rows(lin).Delete shift:=xlUp
Next lin
Existe t-il une possibilité de supprimer les lignes mais à partir de la
condition de la colonne 2.
For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To 1 Step -1 If Cells(lin, 2) = " " Then Rows(lin).Delete shift:=xlUp Next lin
a+ Steph
"Comres.metz" a écrit dans le message de news:42ce4630$0$17467$
Bonjour à toutes et à tous,
J'utilise cette formule (trouver sur Disciplus Simplex) pour remonter un tableau et supprimer les lignes dont la colonne 1 est vide. For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To 1
Step -1 If Cells(lin, 1) = " " Then Rows(lin).Delete shift:=xlUp Next lin
Existe t-il une possibilité de supprimer les lignes mais à partir de la condition de la colonne 2.
Merci d'avance.
Comres.metz
Yes, je suis resté bloqué sur le 1, et je n'ai pas pensé que c'était ma colonne de départ. honte à moi. Merci beaucoup.
"Stephane" a écrit dans le message de news:
Salut ,
oui , avec cela
For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To 1
Step -1 If Cells(lin, 2) = " " Then Rows(lin).Delete shift:=xlUp Next lin
a+ Steph
"Comres.metz" a écrit dans le message de news:42ce4630$0$17467$
Bonjour à toutes et à tous,
J'utilise cette formule (trouver sur Disciplus Simplex) pour remonter un tableau et supprimer les lignes dont la colonne 1 est vide. For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To
1
Step -1 If Cells(lin, 1) = " " Then Rows(lin).Delete shift:=xlUp Next lin
Existe t-il une possibilité de supprimer les lignes mais à partir de la condition de la colonne 2.
Merci d'avance.
Yes, je suis resté bloqué sur le 1, et je n'ai pas pensé que c'était ma
colonne de départ. honte à moi.
Merci beaucoup.
"Stephane" <stemsy.pasdepub@club-internet.fr> a écrit dans le message de
news:eiN2vC6gFHA.1252@TK2MSFTNGP09.phx.gbl...
Salut ,
oui , avec cela
For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To
1
Step -1
If Cells(lin, 2) = " " Then Rows(lin).Delete shift:=xlUp
Next lin
a+
Steph
"Comres.metz" <comres.metz@gendarmerie.net> a écrit dans le message de
news:42ce4630$0$17467$8fcfb975@news.wanadoo.fr...
Bonjour à toutes et à tous,
J'utilise cette formule (trouver sur Disciplus Simplex) pour remonter un
tableau et supprimer les lignes dont la colonne 1 est vide.
For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row
To
1
Step -1
If Cells(lin, 1) = " " Then Rows(lin).Delete shift:=xlUp
Next lin
Existe t-il une possibilité de supprimer les lignes mais à partir de la
condition de la colonne 2.
Yes, je suis resté bloqué sur le 1, et je n'ai pas pensé que c'était ma colonne de départ. honte à moi. Merci beaucoup.
"Stephane" a écrit dans le message de news:
Salut ,
oui , avec cela
For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To 1
Step -1 If Cells(lin, 2) = " " Then Rows(lin).Delete shift:=xlUp Next lin
a+ Steph
"Comres.metz" a écrit dans le message de news:42ce4630$0$17467$
Bonjour à toutes et à tous,
J'utilise cette formule (trouver sur Disciplus Simplex) pour remonter un tableau et supprimer les lignes dont la colonne 1 est vide. For lin = ActiveSheet.UsedRange.Rows.Count + ActiveSheet.UsedRange.Row To
1
Step -1 If Cells(lin, 1) = " " Then Rows(lin).Delete shift:=xlUp Next lin
Existe t-il une possibilité de supprimer les lignes mais à partir de la condition de la colonne 2.
