Effacer des lignes

tototiti2008

XLDnaute Barbatruc

• 1 Juillet 2010

• #2

Re : Effacer des lignes

Bonjour Sophie,

tu ne m'as pas répondu, là :

https://www.excel-downloads.com/threads/rechargement-dun-classeur-partage.144553/

ça correspond à ton besoin ?

 

Vote positif 0 Vote négatif

pierrejean

XLDnaute Barbatruc

• 1 Juillet 2010

• #3

Re : Effacer des lignes

Bonjour Sophie

Teste ceci

Code:

Sub efface()
Application.ScreenUpdating = False
tablo = Range("B1:B" & Range("B65536").End(xlUp).Row)
For n = UBound(tablo, 1) To 3 Step -1
  If tablo(n, 1) = "Sophie" Then Rows(n).Delete
Next n
Application.ScreenUpdating = True
End Sub

Edit ; Salut tototiti

 

Vote positif 0 Vote négatif

Sophie11

XLDnaute Occasionnel

• 8 Juillet 2010

• #4

Re : Effacer des lignes

merci pierrejean! j'apprécie beaucoup ta facon de "coder", j'apprends beaucoup 🙂 🙂
pr tototiti, message répondu, désolé pr le retard, merci encore!!

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 10 Juillet 2010

• #5

Re : Effacer des lignes

Bonjour à tous


Sophie11
Pourquoi mutlipier les posts relatifs à une même problématique ? 🙄
https://www.excel-downloads.com/threads/supprimer-ligne-contenant-x-ou-y-dans-colonne-a.139385/
Il suffisait de faire un up dans celui-ci.
ou la rigueur dans celui-ci
https://www.excel-downloads.com/threads/supprimer-des-lignes-contenant-une-valeur-specifique.141884/

 

Dernière édition: 10 Juillet 2010

Vote positif 0 Vote négatif