X

VBA Excel - Pobieranie danych tekstowych z sieci WEB

20 Aug 2012 19:01 CYcytrusik
  • #1 20 Aug 2012 19:01
    cytrusik
    Level 2  
    Helpful post? (0)
    Witam,
    Potrzebuje pomocy w napisaniu makra które bedzie z konkretnej strony www pobieralo konkretne dane tekstowe. Np. ze strony http://www.tennisexplorer.com wyszukało konkretnego zawodnika i ze strony tegoż zawodnika pobrało i zapisało w Excelu nazwisko i imię oraz np. jego aktualne miejsce w rankingu.
    Wielkie dzięki
  • #2 20 Aug 2012 19:19
    Tommy82
    Level 38  
    Helpful post? (0)
    Ale z czym masz porblem?

    Najpierw musisz spreparować geta na ten URL
    a potem zajrzeć do środka i sparsować z response to co Cie interesuje na przykład tabelkę.
  • #3 20 Aug 2012 19:23
    cytrusik
    Level 2  
    Topic author Helpful post? (0)
    Chetnie to zrobie tylko nie mam pojecia jak to sie robi
  • #4 20 Aug 2012 19:36
    Tommy82
    Level 38  
    Helpful post? (0)
    To może powinieneś się zająć czymś prostszym?

    Tu masz kod oddający idee
    http://stackoverflow.com/questions/2520949/getting-html-source-with-excel-vba
    Nie wiem czy działa ale czegoś takiego powinieneś szukać a wręcz sam znaleźć

    I teraz będziesz miał HTML w dla tabelki Upcoming mathes

    Code: html4strict
    Log in, to see the code


    I musisz sobie to wyciągnąć to co Cie interesuje ze źródła strony.
    Ale Wg mnie VBA się do tego nie nadaje.
  • Helpful post
    #5 20 Aug 2012 20:45
    adamas_nt
    Moderator Programowanie
    Helpful post? (0)
    Najprościej zaciągnąć dane kwerendą (jak leci),

    VBA Excel - Pobieranie danych tekstowych z sieci WEB

    ew. można zoptymalizować, czyt. wyrzucić co niepotrzebne.

    Nagraj makro wykonywania w/w czynności, a do wyszukiwania użyj arkuszowych formuł...
  • #6 20 Aug 2012 22:12
    Tommy82
    Level 38  
    Helpful post? (+2)
    O jeszcze prostsze i elegantsze rozwiązanie.
  • #7 20 Aug 2012 22:21
    cytrusik
    Level 2  
    Topic author Helpful post? (0)
    dzieki :D
  • #8 03 Dec 2013 11:02
    noonka
    Level 7  
    Helpful post? (0)
    witam,
    na początku chciałam zaznaczyć, że jestem nowa na forum i początkująca jeśli chodzi o pisanie w VBA, wiec z góry przepraszam, jeśli wybrałam jednak zły wątek lub kod się posypie czy cus;)

    Makro, które wykorzystuje musi odwoływać się do strony stooq.plz której pobiera dane dotyczące ostatnich 5 notowań spółek czyli adres www powinien się zmieniać w zależności od spółki i okresu z którego dane są potrzebne np.:
    dla porównania oryginalny link:
    stooq.pl/q/d/?s=bal&c=0&d1=20131125&d2=20131202
    link po przeróbce (działający prawidłowo i przypisany do zmiennej "www"):
    Code: vb
    Log in, to see the code


    poniżej załączam kod korzystający z kwerendy (makro było nagrywane):
    Code: vb
    Log in, to see the code


    próbowałam podstawić zmienną "www" w miejsce odnośnika (bezpośrednie umieszczenie "przeformatowanego" adresu wyrzuca błąd), ale program w ogóle tego nie odczytuje. rozszerzenie www o cały fragment czyli razem z "URL;" tez nic nie daje...

    martwi mnie również to, że zmodyfikowany adres pojawia się jeszcze przy okazji ".Name".

    moje pytanie brzmi: czy można pobrać te dane innym sposobem ale nie korzystając ze źródła strony albo jak można zmienić kod, żeby zadziałało?

    z góry dziękuję za pomoc i mam nadzieję, że nie zaplatałam tego bardziej, niż było to konieczne;)

    Pozdrawiam:)
  • #9 03 Dec 2013 12:46
    szarlich
    Level 6  
    Helpful post? (+1)
    o to chodzilo?

    w komorce j1 mam:
    ="URL;http://www"&".stooq.pl/q/d/?s="&"bal"&"&c=0"&"&d1="&D1&"&d2="&D2
    D1
    20131125
    D2
    20131202

    Code: vb
    Log in, to see the code



    kiedys Adamas mi pomogl z podobnym problemem:
    http://www.elektroda.pl/rtvforum/viewtopic.php?t=2487451&highlight=
  • #10 03 Dec 2013 12:58
    noonka
    Level 7  
    Helpful post? (0)
    KURCZe, dzieki:D:D działa idealnie:))

    Pozdrawiam:))
  • #11 03 Dec 2013 13:28
    adamas_nt
    Moderator Programowanie
    Helpful post? (0)
    Tam jest ceesfałka. Może
    Code: vb
    Log in, to see the code
    Jesli nazwy jakieś tam (nie wnikałem) pasują z nazwami plików .csv...
  • #12 03 Dec 2013 17:24
    noonka
    Level 7  
    Helpful post? (0)
    Nie korzystam z tych plików csv, które można pobrać, ale dzięki. :)
Mouser  Search 4 million + Products
Browse Products