Torna indietro   Hardware Upgrade Forum > Software > Programmazione

iPhone 18 Pro: la recensione del miglior iPhone compatto di sempre
iPhone 18 Pro: la recensione del miglior iPhone compatto di sempre
Apple ha rinnovato iPhone 18 Pro soprattutto dentro: chip A20 Pro a 2 nm con memoria affiancata al SoC, camera di vapore tre volte più ampia, Dynamic Island più piccola del 25% grazie a Face ID sotto il display e fotocamera principale con diaframma variabile da f/1.48 a f/4. Lo abbiamo misurato al colorimetro e nei benchmark, usato con iOS 27 e messo alla prova in fotografia tra laghi, borghi e interni poco illuminati
Panasonic, 30 anni di Toughbook: la "Bibbia" di mille regole dietro i nuovi G3 e 34
Panasonic, 30 anni di Toughbook: la "Bibbia" di mille regole dietro i nuovi G3 e 34
A Londra, per il trentennale dei Toughbook, Panasonic ha presentato il tablet G3 e il 2-in-1 34. Con Jon Tucker, a capo dell'ingegneria europea, abbiamo parlato di ciò che non si vede: batterie, antenne, porte seriali e accorgimenti nati sul campo
realme C100x, lo smartphone economico con la batteria da 7500 mAh. La recensione
realme C100x, lo smartphone economico con la batteria da 7500 mAh. La recensione
realme C100x scommette tutto, forse troppo, sulla batteria da 7500 mAh e sulla certificazione ArmorShell per farsi notare nella fascia più economica del mercato: lo abbiamo messo alla prova per capire a chi è rivolto questo smartphone che sacrifica un po' prestazioni, display e fotocamera per offrire l'autonomia migliore possibile a un prezzo decisamente contenuto
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


iPhone 18 Pro: la recensione del miglior iPhone compatto di sempre iPhone 18 Pro: la recensione del miglior iPhone ...
Panasonic, 30 anni di Toughbook: la "Bibbia" di mille regole dietro i nuovi G3 e 34 Panasonic, 30 anni di Toughbook: la "Bibbia...
realme C100x, lo smartphone economico con la batteria da 7500 mAh. La recensione realme C100x, lo smartphone economico con la bat...
Star Wars Zero Company è l'erede di XCOM 2 Star Wars Zero Company è l'erede di XCOM ...
Test ride Can-Am Origin: la moto elettrica che fa dimenticare il motore a scoppio (ma occhio all'autonomia) Test ride Can-Am Origin: la moto elettrica che f...
Silicon Box a Novara, qualcosa si muove:...
Hyundai IONIQ V: la berlina da 800 volt ...
Offerte Prime anticipate, speciale porta...
Trump riunisce i CEO delle big tech e ca...
BLUETTI scatenata per i Prime Big Deal D...
Google ingaggia Henry Cavill: l'attore s...
vivo X Fold6 è ufficiale in Itali...
La Francia resta protagonista di eFootba...
AI Video Verification, la sicurezza pred...
BYD Seagull (Dolphin Surf), nuove immagi...
Windows 11 26H2, disponibili le ISO uffi...
Xiaomi 17 crolla a 799€: 200€ in meno pe...
UGREEN presenta i nuovi NASync DXP6800 U...
Calcolo ottico per l'intelligenza artifi...
Portatile Dell 15 a 518€: Core i5, 16GB ...
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: 12:04.


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