Un pò complicato per la mia esperienza informatica . Non è possibile analizzando i GET come mi hai spiegato sopra implementare una semplice GET URL da VBA che restituisca la tabella corrispondente? Sarà poi mia cura settare delle variabili per cambiare le date, igli anni , ecc...
Analizzando la GET trovo questo:
http://www.cmegroup.com/CmeWS/mvc/Settlements/Options/Settlements//138/OOF?monthYear=EZM16&strategy=DEFAULT&tradeDate=05/25/2016&pageSize=500&_=1464595712049
Cambiando EZM16 e la data sarei in grado di ricavare le altre tabelle....
Ma come implemento la richiesta?
Ho provato quesa sub ma mi da errore
Sub gethtmltable()
Dim objWeb As QueryTable
Dim sWebTable As String
'You have to count down the tables on the URL listed in your query
'This example shows how to retrieve the 2nd table from the web page.
sWebTable = 1
'Sets the url to run the query and the destination in the excel file
'You can change both to suit your needs
Set objWeb = ActiveSheet.QueryTables.Add( _
Connection:="URL;
http://www.cmegroup.com/CmeWS/mvc/Settlements/Options/Settlements//138/OOF?monthYear=EZU16&strategy=DEFAULT&tradeDate=05/27/2016", _
Destination:=Range("A1"))
With objWeb
.WebSelectionType = xlSpecifiedTables
.WebTables = sWebTable
.Refresh BackgroundQuery:=False
.SaveData = True
End With
Set objWeb = Nothing
End Sub