How to start from active cell

[jeff06]

With ActiveSheet.QueryTables.Add(Connection:=connstring, Destination:=Range("A1"), Sql:=sqlstring)
 .Refresh
End With

With this code, the query result will be written starting from cell "A1".

I want the query result to be written starting from the active cell I just clicked, How can I do that?

Thanks

[Simon Lloyd]

How about
[VBA]
Destination:=Activecell
[/VBA]

[jeff06]

THX