ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   downloading charts from internet URLs using Excel VBA (https://www.excelbanter.com/excel-programming/279584-downloading-charts-internet-urls-using-excel-vba.html)

rm24746

downloading charts from internet URLs using Excel VBA
 
For years I have been using Excel VBA to automate getting information
from internets sites. The following code will obtain TEXT, but not
objects such as a chart. Does anyone know a simple method to download
a chart?

With
Sheet1.QueryTables.Add(Connection:="URL;http://www.pcquote.com/stocks/QuoteDirect.php?ticker="MSFT"l,
Destination:=Sheet1.Range("A1"))
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.RefreshOnFileOpen = False
.BackgroundQuery = False
.RefreshStyle = xlOverwriteCells
.SavePassword = False
.SaveData = True
.Refresh BackgroundQuery:=False
End With

Wayne Andre




------------------------------------------------
~~ Message posted from
http://www.ExcelTip.com/
~~ View and post usenet messages directly from http://www.ExcelForum.com/


Tim Williams

downloading charts from internet URLs using Excel VBA
 
fix to suit...

http://groups.google.com/groups?hl=e...phx.gbl&rnum=5

tim


"rm24746" wrote in message
...
For years I have been using Excel VBA to automate getting information
from internets sites. The following code will obtain TEXT, but not
objects such as a chart. Does anyone know a simple method to download
a chart?

With

Sheet1.QueryTables.Add(Connection:="URL;http://www.pcquote.com/stocks/QuoteD
irect.php?ticker="MSFT"l,
Destination:=Sheet1.Range("A1"))
FieldNames = True
RowNumbers = False
FillAdjacentFormulas = False
RefreshOnFileOpen = False
BackgroundQuery = False
RefreshStyle = xlOverwriteCells
SavePassword = False
SaveData = True
Refresh BackgroundQuery:=False
End With

Wayne Andre




------------------------------------------------
~~ Message posted from
http://www.ExcelTip.com/
~~ View and post usenet messages directly from http://www.ExcelForum.com/





All times are GMT +1. The time now is 12:21 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com