Brian 2012-10-22 TrimEnd This script will remove the trailing characters that were defined. The function takes a character field and the character that needs to be removed from the end of the field. Character Option Explicit Function TrimEnd(p1 As String,p2 As String) As String Dim i As Integer Dim tempString As String tempString = p1 For i = Len(p1) To 1 Step -1 If Mid(p1,i,1) = p2 Then tempString = Mid(p1, 1, i - 1) Else trimend = tempString Exit For End If Next i End Function Character p1 Character Field Character p2 Character to remove