I use the following 'ParseString' function in a report application, which works well - until I create a .accde file from my .accdb database. When I ry to run any report that uses 'ParseString' from within the .accde file I get an error: "Undefined function 'ParseString' in expression. (Error 3085)"
Can anyone spot the mistake?
Code:
Function ParseString(AnyString As String) As String
Dim tmpStr As String
Dim lngCount As Long
If Len(AnyString) = 0 Then
ParseString = vbNullString
Exit Function
End If
For lngCount = 1 To Len(AnyString)
tmpStr = tmpStr & Mid(AnyString, lngCount, 1) & " "
Next
ParseString = Left(tmpStr, Len(tmpStr) - 1)
End Function
Can anyone spot the mistake?