Puedes usar
expresiones regulares. O este
otro sitio.
Esto te busca en las parejas leidas si son valores hexadecimales:
[0-9a-fxA-FX][0-9a-fxA-FX]
Para usarlas debes crear un objeto RegExp:
Cita:
Set RegularExpressionObject = New RegExp
With RegularExpressionObject
.Pattern = "<[^>]+>"
.IgnoreCase = True
.Global = True
End With
stripHTMLtags = RegularExpressionObject.Replace(HTMLstring, "")
Set RegularExpressionObject = nothing
Un saludo