About Us

Will

Mike - Thanks. That did it.

"Mike Fogleman" wrote:

That didn't work either under testing, but this did:

Dim rng As Range
Set rng = ActiveCell
With ActiveWorkbook.ActiveSheet _
.QueryTables.Add(Connection:="URL;mytargetpage", _
Destination:=rng)
.BackgroundQuery = True
.TablesOnlyFromHTML = False
.Refresh BackgroundQuery:=False
.SaveData = True
End With

Mike F
"Mike Fogleman" wrote in message
m...
Destination:=.ActiveCell)

We were trying to do things to two different worksheets:
With ActiveWorkbook.ActiveSheet _ 'Activesheet
and then tried to
Destination:=Worksheets("sheet1").ActiveCell) 'Sheet1

Now we need:
With ActiveWorkbook.ActiveSheet _
.QueryTables.Add(Connection:="URL;mytargetpage", _
Destination:=.ActiveCell)

Mike F
"Will" wrote in message
...
Thanks Mike

But that does not seem to work Here is my full code

With ActiveWorkbook.ActiveSheet _
.QueryTables.Add(Connection:="URL;mytargetpage", _
Destination:=Worksheets("sheet1").ActiveCell)
.BackgroundQuery = True
.TablesOnlyFromHTML = False
.Refresh BackgroundQuery:=False
.SaveData = True
End With

"Mike Fogleman" wrote:

Destination:=Worksheets("Data").Activecell)

Mike F

"Don Guillett" wrote in message
...
Here's an example

With ActiveWorkbook.Worksheets("Data").QueryTables.Add( _
Connection:="URL;" & your_url,
Destination:=Worksheets("Data").Cells(1, 1))
.BackgroundQuery = True
.TablesOnlyFromHTML = False
.Refresh BackgroundQuery:=False
.SaveData = True
End With

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Will" wrote in message
...
I need to build an addin application that creates a brand new web
query in
the target cell / cell range. I know how to modify, refresh, but not
create
a brand new query. I intend to provide a choice of several data page
queries.

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
creat a pop up box	delete automatically	Excel Discussion (Misc queries)	10	April 20th 08 03:53 PM
Pls help for creat a Macro....	John	Excel Discussion (Misc queries)	4	January 31st 08 08:29 PM
Creat	dsanita	Excel Discussion (Misc queries)	0	July 25th 06 10:01 PM
How can I creat	NYExcel	Excel Discussion (Misc queries)	2	April 17th 06 04:39 PM
Creat a new worksheet	lashio	Excel Discussion (Misc queries)	4	April 25th 05 03:40 AM

Menu

About Us