Discussion :

[mohcultiv]

salut à tous,

je voudrais rendre invisibleun calendrier lorsque je choisis une date.

Le souci c'est que si je met mon code calendar.visible=false dans la procédure calendar_afterupdate, cela ne risque pas de fonctionner car je ne peux modifier un contrôle actif.

J'ai donc essayer ceci:

Code :

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

1
2
3
4
Private Sub Calendar_AfterUpdate()
datec.Value = Calendar.Value
Call calendarVisible
End Sub

datec est un champs texte qui przend la date selectionner dans le calendrier

Code :

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

1
2
3
4
Private Sub calendarVisible()
Calendar_AfterUpdate.Quit
Calendar.Visible = False
End Sub

mais j'obtiens la même erreur: impossible de masquer le contrôle actif

ce qui est logique vu que la premiere procedure est tjrs en cours d'éxécution.

je me demander donc comment je pouvais faire pour rendre ce calendrier invisible lorsque je selectionne une date.

est-il possible de fermer une procédure à partir d'une autre procédure? un genre de Exit Sub, mais sur une autre procédure que la procédure en cours?

[@rkane]

une idee... passe le focus sur un autre controle et ensuite tu rends le calendrier non visible ou tu le close.

[mohcultiv]

ouais je viens de voir ça sur le net et effectivement ca fonctionne.

Je te remercie.

Salut.