< návrat zpět

MS Excel


Téma: VBA url adresy rss

Zaslal/a 17.6.2016 18:56

čágo, neví někdo, zda jde otevřít url, která bude v excelu, chvilku počkat (URL se přesměruje na jiný web) a tu novou adresu uložit? dá se to?

Zaslat odpověď >

#031795
avatar
v podstatě mi jde o to, že mám adresy a ty potřebuji prohnat googlem a zjistit zeměpisnou délku a šířku. Mám ale přes 100 000 adres, tak hledám nějaký automatizovaný script nebo tak něco.. Všiml jsem si, že když zadám adresu přímo do url, po chvilce vypadne v URL právě délka i šířka, která by šla snadno vytahnout. Našel jsem weby, které to umí, ale jsou drasticky pomalé a projetí 100 000 adres by bylo na týdny. Nenapadá někoho nějaký efektivní a snadný způsob? 5citovat
#031799
elninoslov
Googlovanie 1
Googlovanie 2
Ale Google API, ako píšu, má obmedzenie 2500 požiadaviek/deň.citovat
#031800
avatar
mnohokrát děkuji, ale hned druhý kod mi nefunguje, zkoušel jsem ho mezi prvními a házel mi error na řádku:
Dim googleResult As New MSXML2.DOMDocument
měl jsem zapnuté vše podle toho návodu, tak jsem to vzdalcitovat
#031802
elninoslov
Oba kódy fungujú, oba som otestoval.
Prvý má dole obrovské tlačítko Download, kde máte funkčný príklad v .xlsm.
V druhom v novších Officoch (príklad je tuším na 2007) musíte zmeniť deklaráciu z
Dim googleResult As New MSXML2.DOMDocument
Dim googleService As New MSXML2.XMLHTTP

na
Dim googleResult As New MSXML2.DOMDocument60
Dim googleService As New MSXML2.XMLHTTP60

a opäť to funguje.

Testované na 2013 Pro SK x64 / W8.1.1 Pro SK x64.citovat
#031806
avatar
opravdu to bylo tou deklarací, funguje na výbornou, s limity se už spokojím :) děkujicitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje