Boa tarde, pessoal!

Tenho uma planilha que calcula, via código, as médias de um intervalo de células contidos em planilhas de outras pastas. Esse código permite que eu selecione as pastas cujas planilhas terão suas células (sempre as mesmas) usadas no cálculo

Após executar o cálculo, outro código salva no formato e local definido por mim e abre novamente a planilha para poder executar um novo cálculo. O problema é que quando executo o código para fazer um novo cálculo ele traz novamente os valores usados no cálculo anterior. Ele não "zera", permitindo que eu selecione a origem do novo cálculo.

Se eu fecho ("na mão") a pasta e abro novamente, a coisa funciona.

Tenho como fazer isso no código do salvamento?

Podem me dar uma idéia?

Desde já, obrigado.

Wangchuk

Abaixo o código do salvamento

Sub testeSalva()

filesavename = Application.GetSaveAsFilename( _
filefilter:="Pasta de Trabalho do Excel (*.xlsx), *.xlsx")
If filesavename <> False Then
MsgBox "Save as " & filesavename
Else
MsgBox "Not Saved"
End If

ActiveWorkbook.SaveAs Filename:=filesavename, FileFormat:=xlOpenXMLWorkbook

Workbooks.Open ("C:MEU CAMINHOMEU ARQUIVO.xlsm")

ThisWorkbook.Close SaveChanges:=False

End Sub