Removing HTML tags (specifically <p> tags)

[furiousbob]

Hi!


I'm new here. This would be my first post. I am in dire need of some help with removing HTML tags from a CSV file. I have about 3600 entries to modify. I used:

Sub RemoveTags()
Dim r As Range
Selection.NumberFormat = "@"  'set cells to text numberformat
With CreateObject("vbscript.regexp")
  .Pattern = "\<.*?\>"
  .Global = True
  For Each r In Selection
    r.Value = .Replace(r.Value, "")
  Next r
End With
End Sub

But that left me with about 880 entries with:

p class="MsoNormal" style="margin-bottom:0in;margin-bottom:.0001pt;line-height:normal"
<p class="MsoNormal" style="[/CODE]
p class=" msonormal"=""

(with < and > at the ends, not sure why I can't post it with the CODE tags)

I also tried find and replace using <*> for find and a empty replace field but I get the "Formula is too long" error message.


I'm pretty new to VBA so any help is appreciated!</p>

 

[FDibbins]

x-posted here...
Removing HTML tags (specifically <p> tags)

 

[furiousbob]

Sorry! Didn't know that was a forum rule.