Return to Snippet

Revision: 30858
at August 24, 2010 07:19 by cartercole

Initial Code
Function RemoveRTF(rtfText)
set regexObject = New RegExp
With regexObject
.Pattern = "({\\)(.+?)(})|(\\)(.+?)(\b)"
.IgnoreCase = True
.Global = True
End With
RemoveRTF = Replace(regexObject.Replace(rtfText, ""),"}", "")
End Function

Initial URL

Initial Description
quick way to strip the rtf data so you have clean text

Initial Title
Strip RTF Tags to plain text

Initial Tags

Initial Language