Excel Forum - Porady, Pomoc,  Excel Help, Excel FAQ Strona Główna
 FAQ  RegulaminRegulamin  Szukaj   Użytkownicy   Grupy   Rejestracja   Profil   Twoje wiadomości   Zaloguj 


Poprzedni temat «» Następny temat
ID tematu: 67642 Skopiuj do schowka COVID live update
Autor Wiadomość
KOKOSEK
Fan Excela


Wersja: Win Office 365
Pomógł: 21 razy
Posty: 60
Wysłany: 26-03-2020, 14:25   COVID live update

Jeśli ktoś chce wyświetlać aktualizacje o COVID19 na swoim excel dashboardzie:
W komorke A1 wpisz:
https://www.worldometers....country/poland/

plus:

Kod:
Sub COVIDdataUK()
    Dim http As XMLHTTP60
    Dim html As HTMLDocument
    Dim post As Object
    Dim MyLoc As String
    Dim MyDetails As Variant
    Dim x As Long
    Set http = New XMLHTTP60
    Set html = New HTMLDocument
    With http
        .Open "GET", ActiveSheet.Range("A1").Value, False
        .send
        html.body.innerHTML = .responseText
    End With
    x = 3
On Error Resume Next
    For j = 2 To 8 Step 2
        MyLoc = html.getElementsByClassName("col-md-8")(0).getElementsByTagName("DIV")(0).getElementsByTagName("DIV")(j).innerText
        MyDetails = Split(MyLoc, ":")
        ActiveSheet.Cells(x, 1).Value = Trim(MyDetails(0))
        ActiveSheet.Cells(x, 2).Value = Trim(MyDetails(1))
        x = x + 1
    Next j
End Sub
ID posta: 384300 Skopiuj do schowka
 
 
Marecki 
Excel Expert



Wersja: Win Office 2019
Pomógł: 2367 razy
Posty: 7756
Wysłany: 26-03-2020, 16:02   

Plus włączyć referencje dla:
Microsoft XML v6.0
Microsoft HTML Obiect Library
_________________
Hardware - ta część komputera, którą można kopnąć kiedy software przestanie funkcjonować.

Szkolenia z Excela , FB
Office 2019 Professional Plus , Windows 10 x64
Pozdrawiam, były mkkk23 teraz Marecki.
ID posta: 384307 Skopiuj do schowka
 
 
KOKOSEK
Fan Excela


Wersja: Win Office 365
Pomógł: 21 razy
Posty: 60
Wysłany: 26-03-2020, 23:22   

Marecki napisał/a:
Plus włączyć referencje dla:
Microsoft XML v6.0
Microsoft HTML Object Library


Przepraszam, zapomniałem o tym wspomnieć.
ID posta: 384320 Skopiuj do schowka
 
 
MS_Analyst 
ExcelSpec


Pomógł: 113 razy
Posty: 450
Wysłany: 28-03-2020, 11:15   Analiza COVID-19

Skąd pochodzą informację? Czy są potwierdzone?
U mnie niestety wyskakuje błąd taki jak w załączniku. Proszę o pomoc.

Błąd.png
Plik ściągnięto 227 raz(y) 5.96 KB

ID posta: 384402 Skopiuj do schowka
 
 
umiejead 
Excel Expert


Wersja: Win Office 2013
Pomógł: 613 razy
Posty: 3265
Wysłany: 28-03-2020, 11:30   

U mnie błędu nie ma ale wyników też nie...

PS. W podanym kodzie należałoby jeszcze zadeklarować zmienną j.
.
_________________
.
Jak poprawnie opisać problem: http://www.excelforum.pl/...ika-vt59262.htm
Chcesz precyzyjną odpowiedź - zadaj precyzyjne pytanie.
ID posta: 384403 Skopiuj do schowka
 
 
Kaper 



Zaproszone osoby: 2
Wersja: Win Office 365
Pomógł: 4178 razy
Posty: 7781
Wysłany: 28-03-2020, 17:38   Re: Analiza COVID-19

MS_Analyst napisał/a:
Skąd pochodzą informację? Czy są potwierdzone?

Ja sięgałem do oficjalnych europejskich z https://www.ecdc.europa.e...cases-worldwide - są zgodne z tymi ze strony a … o dzień opóźnione. Natomiast plusem tych z
European Centre for Disease Prevention and Control jest to, że łatwo i wygodnie impotrowalne jeśli chcemy zrobić analizy na większej liczbie krajów. Plik excelowy plus gotowy skrypt do wczytywania do R.
_________________
Kaper Jej Królewskiej Mości :boss

Jeśli dane będą torturowane dość długo, przyznają się do wszystkiego
ID posta: 384427 Skopiuj do schowka
 
 
Marecki 
Excel Expert



Wersja: Win Office 2019
Pomógł: 2367 razy
Posty: 7756
Wysłany: 28-03-2020, 18:18   

Ja przeglądam te:
1. https://www.arcgis.com/ap...423467b48e9ecf6
2. https://www.worldometers....irus/#countries
3. https://experience.arcgis.com/experience/685d0ace521648f8a5beeeee1b9125cd

Pierwszy link jest najczęściej aktualizowany i posiada też link do wersji mobilnej:
https://www.arcgis.com/ap...a75ae62e5c06e61
_________________
Hardware - ta część komputera, którą można kopnąć kiedy software przestanie funkcjonować.

Szkolenia z Excela , FB
Office 2019 Professional Plus , Windows 10 x64
Pozdrawiam, były mkkk23 teraz Marecki.
ID posta: 384429 Skopiuj do schowka
 
 
Waldek 
Excel Expert


Wersja: Win Office 2019
Pomógł: 238 razy
Posty: 1051
Wysłany: 30-03-2020, 08:48   

Ja przeglądam tą:
https://www.mp.pl/pacjent...e-aktualna-mapa
ID posta: 384502 Skopiuj do schowka
 
 
matiz17 
ExcelGaduła 500+


Wersja: Win Office 2019
Pomógł: 1 raz
Posty: 616
Wysłany: 01-04-2020, 04:03   

A mi Znajomy pokazał takie coś:

https://docs.google.com/spreadsheets/u/0/d/1ierEhD6gcq51HAm433knjnVwey4ZE5DCnu1bW7PRG3E/htmlview?fbclid=IwAR0TJrT9cAM_AuehXV3RY1eJm8AIMEVOQbD0qHxkycZn2vVL4wUQJhToaXs

Dobra robota ze strony tego Pana :arrow:
_________________
Matiz17
ID posta: 384644 Skopiuj do schowka
 
 
Wyświetl posty z ostatnich:   
Odpowiedz do tematu
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Nie możesz załączać plików na tym forum
Możesz ściągać załączniki na tym forum
Dodaj temat do Ulubionych
Wersja do druku

Skocz do:  

Powered by phpBB modified by Przemo © 2003 phpBB Group
Theme xandgreen created by spleen& Programosy modified v0.3 by warna
Opieka techniczna www.marketingNET.pl

Archiwum

Strona używa plików cookies.

Kliknij tutaj, żeby dowiedzieć się jaki jest cel używania cookies oraz jak zmienić ustawienia cookie w przeglądarce.
Korzystając ze strony użytkownik wyraża zgodę na używanie plików cookies, zgodnie z bieżącymi ustawieniami przeglądarki.
Sprawdź, w jaki sposób przetwarzamy dane osobowe