Cher galopin01
Un grand merci pour cette précieuse aide !!
Je n'avançais plus dans mon projet. Voilà que tu me donnes des choses à faire ce week-end. Superbe !
Pour le coup je me suis même permis une petite adaptation de ton code:
Sheets("Planung").Range("Q14").Value = DTPicker1
Un grand merci encore !
Cordialement
Willau