Gruppe
UDF
Problem
Wie kann ich feststellen, wie oft eine bestimmte Zeichenfolge in einem vorgegebenen Bereich vorkommt? Groß- und Kleinschreibung sollgen berücksichtigt werden.
StandardModule: basMain
Function WieOft(rngSource, rngTarget) As Integer
Dim rngAct As Range
Dim iCounter As Integer
For Each rngAct In rngTarget.Cells
If rngAct = rngSource Then iCounter = iCounter + 1
Next rngAct
WieOft = iCounter
End Function