You will need a function to do that:
Code:
Public Function ExtractTextPart(AnyString As String) As String
Dim i As Integer
Dim tmpStr As String
For i = 1 To Len(AnyString)
If IsNumeric(Mid(AnyString,i,1)) Then
tmpStr = Left(AnyString,i-1)
Exit For
End If
Next i
ExtractTextPart = tmpStr
End Function
Next Create a new query and in the first column enter
TextOnly:ExtractTextPart([TemplateName])
This will then only list the characters upto the first encounter of a numeric digit. What you have to be careful of is that if the template has a name like Bill2Me0001 you will only get Bill. Not Bill2Me.
David