I've try use the code by Vishesh to perform the job but it seems that's only work for jpb / tif etc. But for the stock chart as as below link, it seems not working, any suggestion?
http://chart.finance.yahoo.com/instrument/1.0/%5EHSI/chart;range=1d/imag...

Below is the original code from Vishesh:
Sub GetShapeFromWeb(strShpUrl As String, rngTarget As Range)
Dim shp As Shape

With rngTarget
With .Parent
.Pictures.Insert strShpUrl
Set shp = .Shapes(.Shapes.Count)
End With
shp.Left = .Left
shp.Top = .Top
End With

Set shp = Nothing
End Sub

Sub Test()
Call GetShapeFromWeb("http://excelexperts.com/sites/default/files/logo.jpg", Sheet1.Range("F3"))
End Sub