• Home
 · 
• String Manipulation
 · 
• This Function makes sure you do not have any unseen characters that may exist in a string or text.

This Function makes sure you do not have any unseen characters that may exist in a string or text.

This Function makes sure you do not have any unseen characters that may exist in a string or text. It is quick, and effective. You can also

Rate This Function makes sure you do not have any unseen characters that may exist in a string or text.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

'AL -04/03/2001- www.brainclone.com has free organized code for bulk download
'Process:   Function Cleans a string from Special, CTRL,Return, and characters not
'-  normally visible. Only allows visible characters in string, strips out others.
'Vars:      strString:  string you want to clean
'Returns:   Clean string to cleanChars

    Dim x As Long
    Dim strAns As String
    Dim strOut As String
    
    For x = 0 To 31
        strAns = Replace(strString, Chr(x), Space(1))
    Next x
    x = 0
    For x = 127 To 255
        strAns = Replace(strAns, Chr(x), Space(1))
    Next x

    strAns = Replace(strAns, vbCrLf, Space(1))
    strAns = Replace(strAns, vbLf, Space(1))
    strAns = Replace(strAns, vbNullString, Space(1))
    strAns = Replace(strAns, vbCr, Space(1))
    strAns = Replace(strAns, vbTab, Space(1))
    strAns = Replace(strAns, vbVerticalTab, Space(1))
    strAns = Replace(strAns, vbNewLine, Space(1))
    
    cleanChars = strAns
End Function