i need excel vba open webpage , find specific value within , put in cell a1. able open page unable number wanted. please assist.
current code have:
dim ie object dim doc htmldocument dim elements ihtmlelementcollection dim element ihtmlelement dim appie internetexplorermedium set doc = appie.document set appie = new internetexplorermedium surl = "example.com" appie .navigate surl .visible = true while appie.busy or appie.readystate <> 4 doevents loop set elements = doc.getelementsbytagname("input") each element in elements if element.id = "form-id" sheets(1).cells(1, 1).valu = element.innertext end if next element set elements = nothing .quit end
below dom explorer data needs find highlighted number: [
instead of
sheets(1).cells(1, 1).valu = element.innertext
try
sheets(1).cells(1, 1).valu = element.getattribute("value")
hope helps
Comments
Post a Comment