Torna indietro   Hardware Upgrade Forum > Software > Programmazione

DJI Lito 1 e Lito X1 recensione: i nuovi droni per principianti che non si fanno mancare nulla
DJI Lito 1 e Lito X1 recensione: i nuovi droni per principianti che non si fanno mancare nulla
DJI ha appena ufficializzato la serie Lito, la sua nuova gamma di droni entry-level destinata a chi si avvicina per la prima volta alla fotografia aerea. Al centro dell'annuncio ci sono due modelli ben distinti per fascia di prezzo e specifiche tecniche: DJI Lito 1 e DJI Lito X1. Entrambi si collocano sotto la soglia regolamentare dei 249 grammi, che permette di volare con requisiti burocratici più semplici rispetto ai droni più pesanti.
Sony World Photography Awards 2026: i premiati, anche italiani, il punto sulla fotografia di oggi
Sony World Photography Awards 2026: i premiati, anche italiani, il punto sulla fotografia di oggi
Siamo stati a Londra per la premiazione dei Sony World Photography Awards 2026, l'evento a tema fotografia più prestigioso. Fra sorprese e novità, ne approfittiamo per fare il punto sulla fotografia contemporanea, in cui la didascalia è sempre più necessaria a cogliere il senso della quasi totalità degli scatti.
Una settimana con Hyundai Ioniq 5 N-Line: diverte e convince
Una settimana con Hyundai Ioniq 5 N-Line: diverte e convince
L'elettrica di casa Hyundai propone una versione AWD con estetica derivata dalla famiglia N. L'abbiamo provata per diversi giorni, per scoprire tutti i dettagli e la vera autonomia in autostrada
Tutti gli articoli Tutte le news

Vai al Forum
Rispondi
 
Strumenti
Old 20-12-2016, 12:29   #1
UwU
Member
 
L'Avatar di UwU
 
Iscritto dal: Feb 2014
Messaggi: 201
[EXCEL VBA] Estrarre dati da sito web

Salve a tutti ragazzi del forum, vi scrivo per chiedervi se qualcuno che sa programmare in VBA mi aiuterebbe ad estrarre dati da questa pagina web: http://www.oddsportal.com/soccer/eng...gue/standings/
PREMESSA:
Ho scritto una formula in excel che dentro una cella mi crea un link come quello, ed io cliccandoci vado diretto alla pagina web.

Ora ciò che vorrei fare è estrarre i dati scritti su HOME e su AWAY e riportarli in un foglio di calcolo. Ho già provato tramite una Query ma non me li estrae, perché non li vede, vede solo la classifica totale, oppure facendo: "Dati" >> "da Web", stessa cosa, non mi permette di copiarli. Ho anche provato registrando una macro, ma niente ancora... Credo resti solo il VBA, ma io non lo conosco come linguaggio di programmazione, mi potete aiutare?



Grazie infinite
UwU è offline   Rispondi citando il messaggio o parte di esso
Old 22-12-2016, 14:54   #2
UwU
Member
 
L'Avatar di UwU
 
Iscritto dal: Feb 2014
Messaggi: 201
Salve a tutti, sono riuscito nell'intento grazie al registra macro e questo è il risultato:
Codice:
Sub EstrDati_a_casa_oggi()
'
' EstrDati_a_casa_oggi Macro
'

'
    ActiveWorkbook.Queries.Add Name:="Tabella1", Formula:= _
        "let" & Chr(13) & "" & Chr(10) & "    Origine = Web.Page(Web.Contents(""http://www.oddsportal.com/ajax-standings/tab/table/table_sub/home/t/jZWp0BeC/ts/f9KQrnNJ/""))," & Chr(13) & "" & Chr(10) & "    Data0 = Origine{0}[Data]," & Chr(13) & "" & Chr(10) & "    #""Modificato tipo"" = Table.TransformColumnTypes(Data0,{{""#"", Int64.Type}, {""Team"", type text}, {""MP"", Int64.Type}, {""W"", Int64.Type}, {""D"", Int64.Type}, {""L"", Int64.Type}, {""G"", " & _
        "type text}, {""Pts"", Int64.Type}, {""Form"", type text}})," & Chr(13) & "" & Chr(10) & "    #""Rimosse colonne"" = Table.RemoveColumns(#""Modificato tipo"",{""#"", ""MP"", ""G"", ""Pts"", ""Form""})" & Chr(13) & "" & Chr(10) & "in" & Chr(13) & "" & Chr(10) & "    #""Rimosse colonne"""
    With ActiveSheet.ListObjects.Add(SourceType:=0, Source:= _
        "OLEDB;Provider=Microsoft.Mashup.OleDb.1;Data Source=$Workbook$;Location=Tabella1" _
        , Destination:=Range("$B$2")).QueryTable
        .CommandType = xlCmdSql
        .CommandText = Array("SELECT * FROM [Tabella1]")
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .PreserveColumnInfo = True
        .ListObject.DisplayName = "Tabella1"
        .Refresh BackgroundQuery:=False
    End With
    Selection.ListObject.QueryTable.Refresh BackgroundQuery:=False
End Sub
solo che estrae da un link che gli ho messo io, ed invece vorrei che estraesse da un link dentro una cella che cambio a mio piacimento, come faccio a modificare il parametro?
UwU è offline   Rispondi citando il messaggio o parte di esso
Old 22-12-2016, 16:55   #3
UwU
Member
 
L'Avatar di UwU
 
Iscritto dal: Feb 2014
Messaggi: 201
sono riuscito a risolvere guardando questo video https://www.youtube.com/watch?v=ZJ30U0qw850 e creando perciò una Web Query Dinamica
UwU è offline   Rispondi citando il messaggio o parte di esso
 Rispondi


DJI Lito 1 e Lito X1 recensione: i nuovi droni per principianti che non si fanno mancare nulla DJI Lito 1 e Lito X1 recensione: i nuovi droni p...
Sony World Photography Awards 2026: i premiati, anche italiani, il punto sulla fotografia di oggi Sony World Photography Awards 2026: i premiati, ...
Una settimana con Hyundai Ioniq 5 N-Line: diverte e convince Una settimana con Hyundai Ioniq 5 N-Line: divert...
Recensione OPPO Find X9 Ultra: è lui il cameraphone definitivo Recensione OPPO Find X9 Ultra: è lui il c...
Ecovacs Deebot X12 OmniCyclone: lava grazie a FocusJet Ecovacs Deebot X12 OmniCyclone: lava grazie a Fo...
Apple prepara un restyling per la linea ...
Il MacBook Neo trascinerà Apple: ...
I genitori potranno verificare gli argom...
ESA e Northrop Grumman confermano la cor...
Il telescopio spaziale Nancy Grace Roman...
iPhone Ultra, periodo di lancio conferma...
Un anno fa debuttava Clair Obscur:&...
Tutte le offerte sugli smartphone ora pi...
Tutte le offerte sui TV ora su Amazon: u...
Xbox Game Pass sarà disponibile a...
La serie HONOR 600 avrà presto un...
Mova Viax 250 in prova: il robot tagliae...
Fat e-bike per tutti: sconti Engwe, pi&u...
Google conferma l'arrivo della nuova ver...
Apple ha trovato il modo per abbassare i...
Chromium
GPU-Z
OCCT
LibreOffice Portable
Opera One Portable
Opera One 106
CCleaner Portable
CCleaner Standard
Cpu-Z
Driver NVIDIA GeForce 546.65 WHQL
SmartFTP
Trillian
Google Chrome Portable
Google Chrome 120
VirtualBox
Tutti gli articoli Tutte le news Tutti i download

Strumenti

Regole
Non Puoi aprire nuove discussioni
Non Puoi rispondere ai messaggi
Non Puoi allegare file
Non Puoi modificare i tuoi messaggi

Il codice vB è On
Le Faccine sono On
Il codice [IMG] è On
Il codice HTML è Off
Vai al Forum


Tutti gli orari sono GMT +1. Ora sono le: 03:44.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Served by www3v