Hola Insomnia!
Yo tuve un caso parecido, pero en el mío me hacía falta pasar la fecha a formato MM/DD/YY, y usé la función MID. Te copio mi código por si te sirve de algo cómo punto de partida:
Código:
'Convierte la fecha a formato MM/DD/YY
Fecha = Date.Today
Fecha = Mid(Date.Today, 4, 2)
Fecha &= "/"
Fecha &= Mid(Date.Today, 1, 2)
Fecha &= "/"
Fecha &= Mid(Date.Today, 9, 2)
Saludos!