Hi,
I have problem to write macro
I want to retrieve data from web. can anyone help me with this?
please........

dataimport external datanew put your url in the address linepick tables
(or whole page)import
--
Don Guillett
Microsoft MVP Excel
SalesAid Software

wrote in message
...
Hi,
I have problem to write macro
I want to retrieve data from web. can anyone help me with this?
please........

VBA demo for importing a webpage into Excel
(This will import this discussion into Excel. Not very pretty, but
good enough to extract any desired data out of the imported web page)

Private Sub Webpageimportexample()
Dim uri As String
Dim ws As Worksheet
uri = "URL;" & "http://groups.google.com/group/
microsoft.public.excel.programming/browse_thread/thread/
f39346eab6de8d55?hl=en"
Err.Clear
Set ws = Worksheets.Add
With ws.QueryTables.Add(Connection:=uri,
Destination:=ws.Range("A1"))
.Refresh (False)
End With
err_num = Err.Number
If err_num < 0 Then
If err_num = 1004 Then
x = MsgBox("no connection", vbCritical, "web page
retrieval")
Else
x = MsgBox("Error while updating: " + CStr(err_num),
vbCritical, "web page retrieval")
End If
End If
End Sub