D
David
Hi Group,
I must have a syntax error here, but can not figure it out:
myurl =
"=http://moneycentral.msn.com/investor/invsub/results/statemnt.aspx?Symbol="
& Symbol _
& "&lstStatement=Income&stmtView=Qtr"
Set QT = ActiveSheet.QueryTables.Add( _
Connection:="URL;" & myurl, _
Destination:=Range("B1"))
With QT
.BackgroundQuery = True
.TablesOnlyFromHTML = False
.PreserveFormatting = True
.WebSelectionType = xlSpecifiedTables
.WebTables = "8"
.Refresh BackgroundQuery:=False
End With
Thanks,
David
I must have a syntax error here, but can not figure it out:
myurl =
"=http://moneycentral.msn.com/investor/invsub/results/statemnt.aspx?Symbol="
& Symbol _
& "&lstStatement=Income&stmtView=Qtr"
Set QT = ActiveSheet.QueryTables.Add( _
Connection:="URL;" & myurl, _
Destination:=Range("B1"))
With QT
.BackgroundQuery = True
.TablesOnlyFromHTML = False
.PreserveFormatting = True
.WebSelectionType = xlSpecifiedTables
.WebTables = "8"
.Refresh BackgroundQuery:=False
End With
Thanks,
David