Again, can't be sure which hierarchy the element is part of. So try finding out the classname or the ID of the element using the code below
Code:Dim ie As InternetExplorer Dim obj As HTMLObjectElement Dim doc As HTMLDocument Set ie = New InternetExplorer ie.navigate "http://www.excelfox.com/forum/f13/replace-incorrect-date-cell-another-valid-date-854/" ie.Visible = True Do While ie.Busy: Loop Do While ie.readyState <> READYSTATE_COMPLETE: Loop Set doc = ie.document For Each obj In doc.all If obj.textContent = "Select" Then MsgBox obj.ID MsgBox obj.className Exit For End If Next obj




Reply With Quote
Bookmarks