Fecha atual en DTPicker

Feliz año a todos,

¿Alguien sabe como poner al fecha actual en el control DTPicker?
Creo que tiene que ser tan fácil como DTPicker.Value= Date pero me da error
La variable de devuelve Date es del tipo dd/mm/aa y la que espera el
DTPicker es ( creo ) del tipo dd:mm:aa. ¿Es cierto, son novato en esto de
programar en VBA?

He probado con DTPicker.day = Day(Now) y también me da error.

Lo ejecuto en la función del click de un botton

Gracias
Jordi