zoeken in tabel, op deel van celinhoud.

[hahaHans]

Deze makro zoekt naar hoeveel cellen in een bereik exact gelijk zijn aan een bepaalde cel. Maar ik wil hem zo hebben dat deze makro zoekt naar alle cellen waarin de zoekstring staat, ook als dat maar een deel van de tekst in de cel is.

Sub tellen()
 Range("K1").Value = WorksheetFunction.CountIf(Range("A3:Z1000"), Range("I1"))
End Sub

Hoe pas ik de makro aan voor dat doel?

 

[Roncancio]

Sub tellen()
 Range("K1").Value = WorksheetFunction.CountIf(Range("A3:Z1000"), "*" & Range("I1") & "*")
End Sub

Dit kan je doen via het toevoegen van "*".

Met vriendelijke groet,


Roncancio

 

[hahaHans]

Yesss!!, Roncancio.

Weer precies wat ik bedoelde. Ik kan weer door met mijn bestand. Dank je.