Avatar billede Butterfly Ekspert
25. januar 2022 - 17:30 Der er 2 kommentarer

Filtrer efter indhold

Hej
Jeg har denne kode der kan filtrere efter værdien, men hvad skal der stå, hvis den skal filtrere efter indhold?
I kolonne B står der en masse navne og jeg vil gerne søge alle ud der hedder noget med "Hans".

Sub Filter()
    On Error Resume Next
    ActiveSheet.ShowAllData
    ActiveSheet.Range("$A$3:$I$1000").AutoFilter Field:=2, Criteria1:=Range("B1").Value
End Sub
25. januar 2022 - 17:43 #1
Criteria1:="Hans"
Avatar billede Butterfly Ekspert
25. januar 2022 - 17:51 #2
Hej
tak, men det er knap nok, det er stadig værdien af B1, men jeg har fundet ud af det

Sub Filter()
Application.ScreenUpdating = False
    On Error Resume Next
    ActiveSheet.ShowAllData
    ActiveSheet.Range("$A$3:$I$1000").AutoFilter Field:=2, Criteria1:="=*" & Range("B1").Value & "*" _
        , Operator:=xlAnd
End Sub
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester





CIO
Årets CIO 2022: Nu skal Danmarks dygtigste CIO findes - er det dig? Eller kender du en, du vil indstille?