range problem with code

[jek40]

I have a button on sheet2 and would like to copy the table from this website and paste it on sheet1. how could i change the line of code below to paste to sheet1 range L1. I I cant seem to come up with something that will work. (the rest of my code is ok -- I just cant seem to get by this line -- it wants to paste to sheet2)

thanks for any help

John

With ActiveSheet.QueryTables.Add(Connection:= _
        "URL;http://www.xxxxxxxx.com/table1.htm", Destination:=Range("L1"))

 

[SydneyGeek]

Hi John,

If you push a button on Sheet2 and don't qualify the reference, VBA assumes that you want to paste to the same sheet. Try:

With ActiveSheet.QueryTables.Add(Connection:= _ 
        "URL;http://www.xxxxxxxx.com/table1.htm", Destination:=Sheets("Sheet1").Range("L1"))

Denis

 

[jek40]

Thanks Denis

That did the trick.

Thanks,

John