Web struganje s VBA

Što je struganje podataka?

Struganje podataka tehnika je koja pomaže u izdvajanju željenih podataka s HTML web stranice u lokalnu datoteku prisutnu na vašem lokalnom stroju. Lokalna datoteka obično može odgovarati excel datoteci, datoteci riječi ili bilo kojoj Microsoft Office aplikaciji. Pomaže u usmjeravanju kritičnih informacija s web stranice.

Struganje podataka postaje jednostavno kada svakodnevno radite na istraživačkom projektu, a takav projekt isključivo ovisi o internetu i web mjestu. Za daljnju ilustraciju teme, uzmimo primjer dnevnog trgovca koji pokreće excel makronaredbu za povlačenje tržišnih podataka s financijskog web mjesta u excel list pomoću VBA.

U ovom vodiču naučit ćete:

Što je struganje podataka?
Kako pripremiti Excel Macro prije izvođenja struganja podataka pomoću Internet Explorera?
Kako otvoriti Internet Explorer pomoću programa Excel VBA?
Kako otvoriti web stranicu u Internet Exploreru pomoću VBA?
Kako izvući podatke s web stranice pomoću VBA?

Kako pripremiti Excel Macro prije izvođenja struganja podataka pomoću Internet Explorera?

Postoje određeni preduvjeti koje treba izvršiti na datoteci makronaredbi Excel prije nego što uđe u postupak struganja podataka u Excelu.

Ti su preduvjeti sljedeći: -

Korak 1) Otvorite makronaredbu zasnovanu na Excelu i pristupite razvojnoj opciji excel.

Korak 2) Odaberite opciju Visual Basic pod vrpcom programera.

Korak 3) Umetnite novi modul.

Korak 4) Inicijalizirajte novu potprogram

Sub test()End sub

Rezultat modula bio bi sljedeći: -

Korak 5) Pristupite referentnoj opciji na kartici alata i uputite se na Microsoft HTML Object Library i Microsoftovu internetsku kontrolu.

Sljedeće datoteke treba uputiti na modul jer pomaže u otvaranju Internet Explorera i olakšava razvoj makro skripti.

Sada je datoteka Excel spremna za interakciju s Internet Explorerom. Sljedeći bi korak bio uključivanje makro skripti koje bi olakšale struganje podataka u HTML-u.

Kako otvoriti Internet Explorer pomoću programa Excel VBA?

Korak 1) Inicijalizirajte varijablu u potprogramima kao što je prikazano u nastavku

Sub test()Dim ie As New InternetExplorerDim doc As New HTMLDocument

Korak 2) Da biste otvorili Internet Explorer pomoću VBA, napišite ie visible = true i pritisnite F5.

Sub test()Dim ie As New InternetExplorerDim doc As New HTMLDocumentIe.visible=true

Modul bi izgledao kako slijedi: -

Kako otvoriti web stranicu u Internet Exploreru pomoću VBA?

Evo koraka za otvaranje web stranice u Internet Exploreru pomoću VBA

Korak 1) Nakon što pristupite Internet Exploreru pomoću programa Excel VBA, sljedeći korak obuhvaća pristup web mjestu pomoću VBA-a. To je olakšano Navigacijskim atributom, pri čemu URL mora u atributu prolaziti kao dvostruki navodnici. Slijedite sljedeće korake kako je prikazano.

Sub test()Dim, ie As New InternetExplorerDim doc As New HTMLDocumentDim ecoll As Objectie.Visible = Trueie.navigate"http://demo.guru99.com/test/web-table-element.php"DoDoEventsLoop Until ie.readyState = READYSTATE_COMPLETE

Korak 2) - Pritisnite F5 za pokretanje makronaredbe. Sljedeća web stranica otvorila bi se onako kako je prikazana

Sada je excel makronaredba spremna za obavljanje funkcija struganja. Sljedeći korak bi prikazao kako se informacije mogu izvući iz Internet Explorera pomoću VBA.

Kako izvući podatke s web stranice pomoću VBA?

Pretpostavimo da trgovac danima želi svakodnevno pristupiti podacima s web mjesta. Svaki put kad trgovac na dan pritisne gumb, trebao bi automatski povući tržišne podatke u excel.

Na gore navedenom web mjestu bilo bi potrebno pregledati element i promatrati kako su podaci strukturirani.

Korak 1) Pristupite donjem izvornom kodu HTML-a pritiskom na control + Shift + I

Izvorni kod bi bio sljedeći:

Sub test()Dim ie As New InternetExplorerDim doc As New HTMLDocumentDim ecoll As Objectie.Visible = Trueie.navigate "http://demo.guru99.com/test/web-table-element.php"DoDoEventsLoop Until ie.readyState = READYSTATE_COMPLETESet doc = ie.document

Kao što se može vidjeti da su podaci strukturirani kao jedna HTML tablica. Stoga bi za izvlačenje cjelokupnih podataka iz html tablice bilo potrebno dizajniranje makronaredbe koja podatke prikuplja u obliku zbirke.

Zbirka bi zatim bila zalijepljena u excel. Da biste postigli željene rezultate, izvedite dolje navedene korake: -

Korak 2) Inicijalizirajte HTML dokument u potprogramu

VBA modul izgledao bi na sljedeći način: -

Korak 3) Inicijalizirajte element kolekcije prisutan u HTML dokumentu

VBA modul izgledao bi na sljedeći način: -

Sub test()Dim ie As New InternetExplorerDim doc As New HTMLDocumentDim ecoll As Objectie.Visible = Trueie.navigate "http://demo.guru99.com/test/web-table-element.php"DoDoEventsLoop Until ie.readyState = READYSTATE_COMPLETESet doc = ie.documentSet ecoll = doc.getElementsByTagName("table")

Korak 4) Inicijalizirajte ćelije lista excel uz pomoć ugniježđene petlje kao što je prikazano

VBA modul izgledao bi na sljedeći način: -

Sub test()Dim ie As New InternetExplorerDim doc As New HTMLDocumentDim ecoll As Objectie.Visible = Trueie.navigate "http://demo.guru99.com/test/web-table-element.php"DoDoEventsLoop Until ie.readyState = READYSTATE_COMPLETESet doc = ie.documentSet ecoll = doc.getElementsByTagName("table")

Excel se može inicijalizirati pomoću atributa raspona lista Excela ili kroz atribut ćelija lista Excel. Da bi se smanjila složenost VBA skripte, podaci o zbirci se inicijaliziraju u atribut excel ćelija lista 1 prisutan u radnoj knjizi.

Jednom kada je makro skripta spremna, dodajte i dodijelite potprogram Excelu i izađite iz modula VBA. Označite gumb kao osvježavanje ili bilo koje prikladno ime koje bi se moglo inicijalizirati. U ovom je primjeru gumb inicijaliziran kao osvježavanje.

Korak 5) Pritisnite gumb za osvježavanje da biste dobili dolje spomenuti izlaz

Korak 6) Usporedite rezultate u Excelu s rezultatima Internet Explorera

Sažetak:

Struganje podataka omogućuje korisniku uklanjanje samo onih podataka koje korisnik želi.
Struganje se može izvesti pomoću Internet Explorera.
Proces struganja sporiji je u slučaju Internet Explorera; međutim, korisniku donosi željene rezultate.
Struganje treba izvoditi s apsolutnom pažnjom i oprezom, jer može naštetiti i srušiti sustav koji se koristi za struganje.