HTML_CleanNumber

Cleans block of string (HTML block) from characters that are not needed
Can have more to add to list of cleaning characters

CodeFunctionName
What is this?

Public

Tested

Original Work
Function HTML_CleanNumber(HTMLBlock)
    ' Cleans block of string (HTML block) from characters that are not needed
    ' like / ' "
    ' More to add later
    '
    Rett = HTMLBlock
    ReplaceCharList = " ":        ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith) '   =  
    ReplaceCharList = " ":        ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith)
    ReplaceCharList = "—":    ReplaceWith = "0":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith) ' — = —
    ReplaceCharList = ",":            ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith)
    ReplaceCharList = " ":            ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith)
    ReplaceCharList = "’":    ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith)
    ReplaceCharList = "'":            ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith)
    ReplaceCharList = "’":    ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith)
    ReplaceCharList = "​":    ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith) ' Zero with space
    ReplaceCharList = "":                ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith)
    ReplaceCharList = "":                ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith)
    ReplaceCharList = "":                ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith)
    ReplaceCharList = "":                ReplaceWith = "":    Rett = Replace(Rett, ReplaceCharList, ReplaceWith)
   
    HTML_CleanNumber = Rett
End Function

HTMLBlock

Views 95

Downloads 25

CodeID
DB ID