Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Michel,
Cette approche m'a aussi permise de découvrir cette autre façon d'y arriver:
Sheets('Input').Select
Dim Datedebut As Date
Datedebut = ActiveSheet.DTPicker1.Value
Sheets('Data').Range('B7') = Datedebut
C'est vraiment plein de possibilités.
Merci
Bonjour à tous,
J'aimerais extraire la valeur(date) d'une boite DTPicker et la copier(valeur seulement) dans une autre cellule.
Je suis seulement capable de copier la boite elle-même avec le code suivant:
ActiveSheet.Shapes('DTPicker1').Select
Selection.Copy...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.