FORUM Tom's Hardware » Le monde de Windows » Développement » pb affighage date. fonction DTPicker1sous VBA excel
 

pb affighage date. fonction DTPicker1sous VBA excel

Il y a 291 utilisateurs connus et inconnus. Pour voir la liste des connectés connus, cliquez ici
Ajouter une réponse



 Mot :   Pseudo :  
 
Bas de page
Auteur
 Sujet : pb affighage date. fonction DTPicker1sous VBA excel
 
tant que tu rames, tu avances
Plus d'informations

BONJOUR,  
 
j'utilise un calendrier dans une fenetre(userform) avec la fonction "DTPicker1" et j'aimerais que lorsqu'une date  
est validée par l'appui sur le bouton ok, qu'elle soit réécrite dans une autre feuille.
 
Or quand j'execute ma macro, la date inscrite dans la cellule est le 0-janvier-1900 et non la date du calendrier. connaissez vous le probleme?
merci pour votre attention.
 
sous progs:
Private Sub CMD_ok_Click()
Dates = .DTPicker1.CalendarTitleBackColor
End sub
 
Private Sub DTPicker1_CallbackKeyDown(ByVal KeyCode As Integer, ByVal Shift As Integer, ByVal CallbackField As String, CallbackDate As Date)
 
End Sub
 
morceau de macro:
Sub Remplir_Atelier_Tournage()
 
    Sheets("AtelierT" ).Activate
    Range("A2" ).Select
    Do Until ActiveCell.Value = ""
            ActiveCell.Offset(1, 0).Select
   Loop
    ActiveCell.Value = Dates
End sub

tant que tu rames, tu avances
Plus d'informations

j'ai trouvé la solution grace à l'aide julien. Il suffisait de changer ma declaration des variables. merci
 
"global dates as date"


Aller à :
Ajouter une réponse
  FORUM Tom's Hardware » Le monde de Windows » Développement » pb affighage date. fonction DTPicker1sous VBA excel
 

Annonces Google
Publicité
Les ressources relatives