Planning perpétuel compatible avec Excel 2016

bonjour,

j’aurais besoin de votre aide j'ai créer un planning perpétuel sur excel 2010 avec des dtpicker qui ne son plus sur excel 2016 nous allons bientôt tous passer sous excel 2016

j'ai pu récupéré un calendrier sur un userform sur un forum, pour choisir les date de début et de fin

mon problème c'est que quand je choisi la date 02/01/2019 ;sur ma base de donnée il s’inscrit 01/02/2019

quelqu'un pourrait-il m'aider

je vous joint le classeur test

bien cordialement

Bonjour

tes dates sont en texte dans l'userform

essaie ceci :

      .Cells(Lig_ecriture, 2) = CDate(date_debut)
      .Cells(Lig_ecriture, 3) = CDate(date_fin)

J'ai aussi une erreur sur Chr(10) dans la macro ... essaie vbCrlf

UserForm3 introuvable !

bon j'arrête là ... reprends tout à zéro

Voici un calendrier compatible (merci à son auteur)

Bonjour Chris51600,

Si tu gardes le calendrier que tu avais récupéré, pour obtenir la bonne date je propose de modifier "CommandButton2_Click" du "userform1" :

Private Sub CommandButton2_Click()
Application.ScreenUpdating = False
Dim Ws As Worksheet
CelDebJour = "DATE"
CelDebNom = "NOM"
CelAnnee = "ANNEE"
Mois = Array("Janvier", "Février", "Mars", "Avril", "Mai", "Juin", "Juillet", "Août", "Septembre", "Octobre", "Novembre", "Décembre")
With Sheets("BDD_CAL")
      Lig_ecriture = .Range("A" & Rows.Count).End(xlUp).Row + 1
      Nom = ComboBox2
      date_debut = Label5
      date_fin = Label6
      Motif = ComboBox1

      .Cells(Lig_ecriture, 1) = Nom
      .Cells(Lig_ecriture, 2) = CDate(date_debut)
      .Cells(Lig_ecriture, 3) = CDate(date_fin)
      .Cells(Lig_ecriture, 4) = Motif
End With
Application.ScreenUpdating = True
Unload Me
End Sub

Ceci dit, ce "Date picker" ne me semble pas "élégant"...

merci beaucoup pour votre aide

Gvialles si tu un "DATE PICKER" plus elegant je suis preneur

cordialement

Bonjour,

celui-ci peut-être ? (il n'est pas de moi je précise)

https://forum.excel-pratique.com/viewtopic.php?p=723779#p723779

Bonjour Chris51600,

Pourquoi ne pas utiliser celui de MSO ?

Pour l'activer : clic-droit dans la "Boite à outils" puis "Contrôles supplémentaires" (cf P.J.) puis check du contrôle Date Picker (cf P.J.)

parce qu’on ne le retrouve pas sous excel2016