How can I Run a SQL query from a VB macro and retrieve the imported data in a range of a sheet with out affect existing graphics and data?

This sheet has data and graphics in range "A1:M20". I want to keep it there and the query table Destination property := Range("A50").

The query works fine, fill de query table in this range ("A50") but, deletes the graphics and any data that was in the sheet before executing the macro.


With ActiveSheet.QueryTables.Add(Connection:="ODBC;DSN=Excel Files; _
DBQ=D:\Weekly reports\WEEKLY06.xls;DefaultDir=D:\Weekly reports", _
Destination:=Range("$A$50"))
.CommandText = SQLQuery1 & SQLQuery2
.Refresh BackgroundQuery:=False
End With


Thanks