having little trouble detecting
list1 items
site1.com
site2.com
site3.com
list2 items
<a href="http://www.site1.com/">free- Free general Directory</a>
<a href="http://www.site2.com/">red- Free turn Directory</a>
using this code now
cant get it to work because list2 has < > and other chars please help
list1 items
site1.com
site2.com
site3.com
list2 items
<a href="http://www.site1.com/">free- Free general Directory</a>
<a href="http://www.site2.com/">red- Free turn Directory</a>
using this code now
Code:
Dim BoolAdd As Boolean, i As Long, J As Long
On Error Resume Next
For i = List1.ListCount - 1 To 0 Step -1
For J = 0 To List2.ListCount
If List1.List(i) = List2.List(J) Then
List1.RemoveItem (i)
Exit For
End If
DoEvents
Next J
DoEvents
Next icant get it to work because list2 has < > and other chars please help