XL 2016 calendar 1

[sesa]

bonjour,
j'ai un fichier de rendez vous qui fonctionnait sous excel 2003 et 2010.
actuellement, sur un pc, j'ai voulu le tester sous 2016 mais visual basic s'ouvre et m'annonce une erreur sur le calendar 1 .
j'ai enregistré le fiché en xlms avec prise en charge marco, sans succès. il y a aussi le nombre de vues qui s'incrémente pas lorsqu'on ouvre le fichier à plusieurs reprises !

pourriez vous me dire ce qu'il cloche ?
ci joint le fichier
merci

 

[Staple1600]

Bonsoir

En théorie, le contrôle Calendar n'est pas disponible sur ton PC avec Excel 2016.
Par conséquent, c'est normal que tu aies une erreur.

Regardes dans les archives du forum, il y a des alternatives à ce contrôle.

 

[Roland_M]

bonjour à tous,

Salut à toi Staple !

voir si ça convient !? (compatible toutes versions !)

EDIT:

j'ai collé mon calendrier (voir l'userf)

et j'ai modifié ton sub ci-dessous:
Private Sub Image1_Click()
fmSTD_Calendrier.SelectDateCTRL1 Me, TextBox4 '<charge le cal et colle la date dans l'objet TextBox4
End Sub

remarque, il est souhaitable d'utiliser Cdate(), voir modif faite dans ton code
.Cells(NlleLigne, 5) = CDate(TextBox4.Value)

 

[sesa]

salut Roland, Staple
merci.
j'étais en train de voir sur gogle . j'ai activé l’option développeur afin d'installer ceci MSCOMCT2.OCX
mais pas trouvé.
je vais tester ta modif Roland et reviens vous dire

 

[sesa]

merci Roland.
ça fonctionne à merveille.
vous êtes des pros !

 

[Roland_M]

re

content pour toi !
ce calendrier peut être utilisé pour saisie date sur cellule ou sur userform, ou encore dans un module

voir ici, les classeurs avec tous les détails pour leurs utilisations:
https://www.excel-downloads.com/threads/date-picker-refuse-de-fonctionner.130232/#post-763811