Discussion :

[Liobra]

Bonjour tout le monde,

J'ai un userform avec un dtpicker qui ne fonctionne pas et je n'arrive pas à résoudre le problème. Le format de la colonne est de type date courte.
Quand je veux ajouter une date dans cette colonne, il m'ajoute automatiquement 00/01/1900. J'ai déjà essayé plusieurs solutions (format, datevalue, etc.) mais je n'arrive pas à le résoudre, quand j'utilise ces méthodes il me met 30/12/1899. J'ai essayé sur un autre fichier et ça fonctionne, la date s'affiche correctement. Je ne comprends pas pourquoi ça fait ça...

Je met mon code en dessous.

Avez-vous une idée pour résoudre le problème ?

Merci à vous.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Private Sub UserForm_Initialize()
Me.DTPicker1.Value = Now
End Sub
 
Private Sub Btn_Valider_Click()
Dim ActiveLigne as Integer
ActiveLigne = Cells(Cells.Rows.Count,1).End(xlUp).Offset(1,0).Row
Cells(ActiveLigne,3).Value = DTPicker1.Value 
End Sub

[Invité]

Bonjour,

J'imagine que la dll Windows Common Controls est toujours présente sur votre poste.
Pièce jointe 575440
Cette dll n'est plus présente sur les versions récentes d'office. J'ai donc abandonné ce contrôle et l'ai remplacé par le contrôle calendrier créé par RUDURUPTqui malheureusement n'intervient plus sur ce forum (son nom est remplacé par invité). Vous pouvez récupérer son contrôle ici : Ajout-controles-activex-manquants.
Plusieurs versions coexistent, la version 3 (je crois) est meilleure que le contrôle DtPicker, car le contrôle intègre les jours fériés (français).

[Liobra]

Bonjour Eric,

Je te remercie tout fonctionne parfaitement !

[Invité]

!

Bonjour,

Pour ne pas mourir idiot, comment as-tu réglé ton problème ?

[Liobra]

J'ai utilisé le calendrier que tu m'as conseillé à la place du dtpicker d'excel.