Refer to a different worksheet

[Basta1980]

Hi there,

I have this code

With ActiveSheet.QueryTables.Add(Connection:= _
"OLEDB;Provider=Microsoft.Office.List.OLEDB.1.0;",
Destination:=Range("A1"))

What I need is a code that doens not refer to the active sheet but to a
sheet with name TimeToImplement cell A1. How do I go about?!

Regards,

Basta1980

 

[Patrick Molloy]

if you mean the worksheet name is in A1 of the activesheet, then

With WorkSheets( Range("A1").Value ).QueryTables.Add(Connection:= _
"OLEDB;Provider=Microsoft.Office.List.OLEDB.1.0;", _
Destination:= .Range("A1"))

 

[Jacob Skaria]

With ActiveWorkbook.Sheets("TimeToImplement").QueryTables.Add(Connection:= _
"OLEDB;Provider=Microsoft.Office.List.OLEDB.1.0;",
Destination:=Range("A1"))

If this post helps click Yes

 

[Basta1980]

Patrick,

Thanks, but the problem was I didn't want to refer to an activesheet. But
this got me going in the right direction.

Thnx

Basta1980

 

[Basta1980]

Jakob,

Thanks. With a slight change (destination required sheetname) the code
worked perfect.

Regards

basta1980