Removing data after finding text in cell

[pnjfksx]

I am running a VBA macro on a spreadsheet and I need to remove some HTML <.span> tags. In my case, I want to delete everything from the first bracket of "<.span" to the last bracket of "<./span>", including the content between the tags. Any ideas on a quick way to do this?

Thanks!

Sorry, the system interpreted my HTML span tags and didn't display them. I have now placed dots in the tags to get them to show.

 

[NdNoviceHlp]

How about something like this. Sheet1!A1 is the cell with the tags in this example. Dave

Private Sub CommandButton1_Click()
Dim strtest As String, flag As Boolean, newstring As String
Dim temp As Integer, i As Integer
strtest = [sheet1!A1]
flag = False
For i = 1 To Len(strtest)
  If flag = False Then
  temp = Asc(Mid(strtest, i, 1))
  If temp = 34 Then
  flag = True
  End If
  newstring = newstring + Mid(strtest, i, 1)
  End If
  Next i
[sheet1!A1] = newstring
End Sub

edit: whoops