Bonjour,
j'ai bossé un peu dessus, voici le résultat.
Option Explicit
Dim dDateOld As Date
Private Sub DTPicker1_Change()
Dim dDateVal
dDateVal = DTPicker1.Value
Type: Messages; Utilisateur: El_Titof
Bonjour,
j'ai bossé un peu dessus, voici le résultat.
Option Explicit
Dim dDateOld As Date
Private Sub DTPicker1_Change()
Dim dDateVal
dDateVal = DTPicker1.Value
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.