Por defeito, aparece o formato Americano.
Há vários posts sobre o assunto em "Pesquisar threads relacionados".
É necessário formatar a linha de código:
CDate(Format("TUA VARIÁVEL OU OBJETO", "dd/mm/aaaa")
Marca como respondido se atender a tua necessidade.
M_A_S_L