Update a Querytable in an XLA

Hi.

I want to update data from a Querytable. I want to do it each "x" minutes automatically. But the data I want to update is located in sheet of an add-in (xla). I try do it without sucess, it only works if the data is located in a workbook (xls).

The code that configure the data update is this:

With ThisWorkbook.Sheets("Rates").QueryTables("CurrencyRates")
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.RefreshOnFileOpen = Chk3.Value
.BackgroundQuery = Chk1.Value
.SaveData = True
If CHk2.Value Then .RefreshPeriod = CInt(TextBox1.Text)
End With

It works when I export the sheet of the add-in to an active workbook. It doesn't work to update the sheet inside the add-in.