There's this website: https://mwatch.boursakuwait.com.kw/default.aspx/AllShares
There's a stock market table that I want to import into my Excel workbook.
I found this code on a website and tried to edit it:
Option Explicit
Sub gethtmltable()
Dim objWeb As QueryTable
Set objWeb = ActiveSheet.QueryTables.Add( _
Connection:="URL;https://mwatch.boursakuwait.com.kw/default.aspx/AllShares", _
Destination:=Range("A1"))
With objWeb
.WebSelectionType = xlSpecifiedTables
.WebTables = "1"
.Refresh BackgroundQuery:=False
.SaveData = True
End With
End Sub
I get a message saying that the query returned no data.
Can anyone please help? I'm using the latest version of Excel on an iMac.
There is no "Import data from a website" option.
Aucun commentaire:
Enregistrer un commentaire