2013-05-15 49 views
0

在Excel覆蓋表我有下面的代碼在Excel VBA我不能使用VBA

'Create query table to hold the rates. 
    With objBK.Worksheets(1) 
     Set objQT = .QueryTables.Add(_ 
     Connection:="URL;https://xxx.output=XLS", _ 
     Destination:=.Range("A1")) 
    End With 

https://xxx.output=XLS回報是寫在我的工作表的A1單元格的XLS表格。

問題是,每次我運行這個查詢時,它都會在A1中移動上一個表,而不是覆蓋它。

如何覆蓋舊錶?

回答

2

當你真的想要調整現有的一個,你不斷地添加新的。給你的QueryTable一個名字(objQT.Name =「blah」)。然後,當你需要調整它時,抓住 QueryTable並對其進行調整。

另外,只需刪除舊的創建一個新的。