Tri et filtre dans feuille ?
Bonjour, j'aimerai pouvoir avec la macro qu'elle prennent en compte plusieurs éléments par exemple :
Elle tris le bonjour A et je voudrais aussi qu'elle prenne en compte d'autres lignes comme bonjour A, bonjour B etc etc
Merci
Sheets("bonjour").Range("A2:H2000").ClearContents
With WsSource
If .AutoFilterMode = True Then .ShowAllData
NbLg = .Range("A" & Rows.Count).End(xlUp).Row
With .Range("A1:H" & NbLg)
.AutoFilter Field:=3, Criteria1:="=bonjour A"
.AutoFilter Field:=4, Criteria1:="=abc"
'.Range("A1:H" & NbLg).AutoFilter Field:=4, Criteria1:="=*abc*"
If Application.Subtotal(3, .Columns("A")) > 1 Then
.Range("A2:H" & NbLg).SpecialCells(xlCellTypeVisible).Copy Destination:=WsDestin.Range("A2")
.Range("A2:H" & NbLg).SpecialCells(xlCellTypeVisible).EntireRow.Delete
End If
.Range("A1:H" & NbLg).AutoFilter
End With
End With
Bonjour
Si tu joignais ton fichier, il serait plus agréable de t'aider...
Bye !
Bonjour,
et merci de baliser le code, il y a pourtant une icône dédiée !
De la précision dans les explications ne serait pas du luxe car « tri » ne veut pas dire « filtre » !
Où est le tri dans le code ?!