Eu não sei se posso ajudar, mas acredito que vamos precisar de um modelo de como você faz, para verificar como altera a configuração do calculo!

Então,,,

Acho que estou no caminho certo, mas falta alguns ajustes que eu não estou conseguindo encontrar.
Exemplo do Código.

Dim dData As Date
dData = Range("A1").Value

Na célula 'A1' tenho a data 12/06/2015, quando de-bugo o código, se paro o mouse sobre o Range(A1).Value ele exibe o valor da célula (a data 12/06/2015 certinha).
Já quando paro o mouse sobre a variável 'dData' ela aparece com zeros assim (dData=00:00:00).
Não era pra aparecer a Data que está no A1.?

Não entendi muito bem, mas a data de A1 só vai para a variável depois dessa linha:

dData = Range("A1").Value

E, quando termina o código, ele limpa a variável, ou seja, se vc passar o mouse sobre a variável, ela não vai ter valor algum, mas sempre que o código rodar, ele vai pegar o valor da variável.