ExcelMentee
Banned - Rules violations
- Joined
- Jan 11, 2021
- Messages
- 31
- Office Version
- 365
- Platform
- Windows
As i am new to VBA and looking for a code which downloads the following items from the given web link. I tried ti find something but all i found is that below code can someone please help me.
Column 1: Item name
Column 2: item price
Column 3: Shipping price
Column 4: item price + Shipping price
Column 1: Item name
Column 2: item price
Column 3: Shipping price
Column 4: item price + Shipping price
Code:
Sub Web_Scraping()
Dim Internet_Explorer As InternetExplorer
Set Internet_Explorer = New InternetExplorer
Internet_Explorer.Visible = True
Internet_Explorer.navigate ("https://www.ebay.com/sch/i.html?_nkw=045496902612+-Disc+-Only+-Refurbished+-Used+-Lot+-Import+-Japan+-Repro+-Reproduction+-Replacement+-VGA+-Graded+-Edition+-Edtion+-EU+-Mod+-Mods+-Moded+-modded+-Digital+-Collection+-Bundle+-Code+-Codes&LH_TitleDesc=0&LH_BIN=1&LH_Sold=1&rt=nc&LH_PrefLoc=1&LH_ItemCondition=3")
Do While Internet_Explorer.readyState <> READYSTATE_COMPLETE: Loop
MsgBox Internet_Explorer.LocationName & vbNewLine & vbNewLine & Internet_Explorer.LocationURL
End Sub
Last edited by a moderator: