VBA_dev_Anne_Marie
XLDnaute Occasionnel
Bonjour,
Je souhaite créer un filtre en colonne A en VBA pour supprimer toutes les lignes contenant le mot "page" ("page 1" ,"page fin" etc)
Mon code est :
Mais il y a quelque chose qui ne va pas, car je crois que la condition A: having('%Page%') n'est pas correcte.
Auriez-vous des idées comment on écrit ce genre de condition, s'il vous plaît ?
Merci
Je souhaite créer un filtre en colonne A en VBA pour supprimer toutes les lignes contenant le mot "page" ("page 1" ,"page fin" etc)
Mon code est :
VB:
Sub filtre()
Dim Lg%, Plg As Range
Lg = Cells.Find("*", , , , xlByRows, xlPrevious).Row
Set Plg = Range("a1:a" & Lg)
Plg.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Range("A: having('%Page%'), Unique:=False
Plg.Offset(1, 0).SpecialCells(xlCellTypeVisible).EntireRow.Delete
On Error Resume Next
ActiveSheet.ShowAllData
End Sub
Mais il y a quelque chose qui ne va pas, car je crois que la condition A: having('%Page%') n'est pas correcte.
Auriez-vous des idées comment on écrit ce genre de condition, s'il vous plaît ?
Merci