In diesem Beispiel wird festgelegt, dass Formeln, die sich rechts von der ersten Abfragetabelle befinden, immer automatisch aktualisiert werden, wenn die Abfragetabelle aktualisiert wird.
Sheets("sheet1").QueryTables(1).FillAdjacentFormulas = True