WWW pro školy
Jak na Office - tutoriály, video návody











Vytvoř si párové triko

Poradna - stahování dat z webu

Vložení příspěvku
Předmět:
Vaše jméno: (povinný údaj) Váš e-mail:
Text:(Zbývá: 1000 znaků - povinný údaj)
Připojit ukázkový soubor:
(Maximální velikost souboru jsou 2MB.)
 Opište následující text (kvůli zneužití):  WCaHD   

hlavní kategorie | zpět | + odpovědět na toto téma
stahování dat z webu - diskuze na toto téma
Dobrý den, měl bych prosbu, ale nevím jak zda je to vůbec možné... potřeboval bych pomocí VBA stahovat data (čísla) z webu. př: chtěl bych ze stránek http://www.czc.cz/hp-250-g3-cerna_2/155258/produkt stáhnout objednávací kód "155258" do buňky "B2" tímto ale nemyslím použít fci "data - z webu" a proklikat to.. předem děkuji za jakoukoliv pomoc :)

Havran | 2.12.2014 05:28  
 
 
Skús kód: Sub wwwlist() ' With ActiveSheet.QueryTables.Add(Connection:= _ "URL;www.czc.cz/hp-250-g3-cerna_2/155258/produkt", Destination:=Range( _ "$A$2")) .Name = "produkt" .FieldNames = True .RowNumbers = False .FillAdjacentFormulas = False .PreserveFormatting = True .RefreshOnFileOpen = False .BackgroundQuery = True .RefreshStyle = xlInsertDeleteCells .SavePassword = False .SaveData = True .AdjustColumnWidth = True .RefreshPeriod = 0 .WebSelectionType = xlEntirePage .WebFormatting = xlWebFormattingNone .WebPreFormattedTextToColumns = True .WebConsecutiveDelimitersAsOne = True .WebSingleBlockTextImport = False .WebDisableDateRecognition = False .WebDisableRedirections = False .Refresh BackgroundQuery:=False End With End Sub
Odpověď
lukas | 2.12.2014 13:46  
 
 
díky, ale tohle už je pro mě vyšší dívčí.. mohl bys mi to prosím hodit do excelu, snažil jsem se ale furt mi to tam házelo chyby a nejsem schopnej to dát do kupy, kor v takovýmhle rozsáhlým kódu. Děkuji..
Odpověď
lukas | 3.12.2014 15:19  
 
 
děkuji za pomoc, nicméně toto mi stahuje celou stránku, šlo by nějak definovat aby to stáhlo pouze jednu hodnotu (nevím, třeba nějak ze zdrojového kódu podle řádku nebo tak něco?) Děkuji..
Odpověď
pidlla | 2.12.2014 15:04  
 
 
Havranův kód vložený do sešitu.
Odpověď
lukas | 3.12.2014 15:19  
 
 
děkuji za pomoc, nicméně toto mi stahuje celou stránku, šlo by nějak definovat aby to stáhlo pouze jednu hodnotu (nevím, třeba nějak ze zdrojového kódu podle řádku nebo tak něco?) Děkuji..
Odpověď
Havran | 4.12.2014 06:35  
 
 
Ak už máš stiahnutý web, t.j. a liste všetko čo potrebuješ, môžeš už zapojiť klasické hľadanie požadovaných dát (vzorcami, makrom). Pritom stiahnutá stránka môže byť na skrytom liste.
Odpověď
Lukas | 4.12.2014 09:49  
 
 
OK, dík to by šlo :) *ještě jednou všem dík za pomoc :)
Odpověď