Hi, I wrote a Macro that runs two different web queries. What I need to do is
make them work on different sheets.

Here's part of it:

'Dim strCnn As String
strCnn = "URL;" & Range("B6").Text
With ActiveSheet.QueryTables.Add(Connection:=strCnn,
Destination:=Range("B10"))
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True

I want this one to work on a specific sheet, not the activsheet!

Many thanks,
Alex

With ActiveSheet.QueryTables.Add(Connection:=strCnn, _
Destination:=Worksheets("Data6").Range("B10"))


--
Regards,
Tom Ogilvy


"Alex Martins" <Alex wrote in message
...
Hi, I wrote a Macro that runs two different web queries. What I need to do
is
make them work on different sheets.

Here's part of it:

'Dim strCnn As String
strCnn = "URL;" & Range("B6").Text
With ActiveSheet.QueryTables.Add(Connection:=strCnn,
Destination:=Range("B10"))
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True

I want this one to work on a specific sheet, not the activsheet!

Many thanks,
Alex