Discussion :

[gangsterus]

Bonjour,

J'ai bien lu un post qui traitait déjà de ce sujet, mais il me reste une erreur, j'espère que vous pourrez m'aider.

J'ai un Combo :"ComboDLCA"
Une variable "vDL" en String.
Un calendrier Calendar1.

Je souhaite que l'utilisateur clique dans le combo pour faire apparaître le calendrier, qu'il sélectionne la date et qu'elle s'affiche dans le combo.


Voici mon code:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub Calendar_1 Click()
 
vDL = Calendar1.Value
FrmNouveauContact.ComboDLCA.Value = vDL
FrmNouveauContact.Calendar1.Visible = False
 
End Sub
 
Sub ComboDLCA_Enter()
 
FrmNouveauContact.Calendar1.Visible = True
 
End Sub

L'erreur apparaît à la ligne:

Code :

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

FrmNouveauContact.ComboDLCA.Value = vDL

c'est une erreur 380:

Impossible de définir la propriété Value. Valeur de propriété non valide.

J'ai essayé le code issu du post, mais ça me crée des erreurs aussi...

Merci d'avance pour vos idées.

ps:

[ilcocodrillo]

la première choe que je ferai pour m'assurer que je n'ai pas un problème de compatibililté de variable c'est de définir la variable vDL en variant (à mon humble avis ça devrait être une date..)

Avoir

[Invité]

Bonjour

Il existe déjà un contrôle qui te fait tout cela, le DTpicker (Date and Time DTPicker)

Pourquoi ne pas l'utiliser ?

Starec

[gangsterus]

Merci pour ces premières réponses.
C'est vrai que le contrôle DT Picker est pas mal et qu'il fait le travail que je cherche à réaliser, mais est-il possible d'ajouter des lignes autres que des dates dans la liste déroulante?
Il se peut que l'utilisateur ne connaisse pas la date exacte, il pourra alors choisir dans une liste : - d'un mois, ou dans 15 jours,...

En tout cas, merci pour ces infos, je continue à chercher

En mettant vDL en Date, ça ne fonctionne pas mieux, mais je pense également que ça peut venir de la variable.
Je l'ai mise en string car je souhaite intégrer dans ma liste déroulante des chaînes de caractère

[gangsterus]

J'ai trouvé. Enfin, c'est ce qu'on va dire.
J'ai supprimé le combobox et j'en ai recréé un avec exactement le même nom. Et ça marche!

Bref, j'avais dû faire une boulette quelque part!

Merci aux interventions qui m'ont permis d'avancer. Je remercie aussi ma famille, mon producteur, toute la technique...

A bientôt pour de nouvelles aventures.

May the Force be with you