ich möchte in einer Variable hinterlegen, wieviele Trennzeichen ("/") in einem String (ebenfalls als Variable verfügbar) vorkommen.
Der Code funktioniert jedoch nicht, bzw. wird mir immer ein Laufwerkfehler 13 angezeigt:
Public Sub testen()
Dim teststring as string, anzahl_zeichen as long
Let teststring = "ID/Anschrift"
anzahl_zeichen = Evaluate("=LEN(" & teststring & ")-LEN(SUBSTITUTE(" & teststring & ",""/"","""" _
_
))")
End Sub
Hat hier jemand eine Idee, was daran falsch ist?Danke!
Gruß
Benedikt