Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Meme calenderie pour deux usf

Ilino

XLDnaute Barbatruc
Forum Bonjour
initialement j'ai cré un calenderirer pour le 1er USF (FSRx) pour le TextBox (date_arrivée colonne L) est ça fonctionne parfaitement, et lors de la création 2eme USF (Valider2) pour le TextBox17 colonne P) avec le méme Calenderier; j'ai trouvé ce type de souci :
quand je clic au permier affichage de USF Valider2 dans les controles de frame2 (CombBox ou TextBox) , il s'affiche le calenderier alors je souhaité qu'il s'affiche uniquement si je clic sur TextBox17.
NB: pour afficher le USF Valider2 cliqué sur le bouton Valider dans la feuille FSEx 2014 pour rechercher "AAAAAA" (exemple), 1 et 1
GRAZIE
 

Pièces jointes

  • ILINO FSE 2014 V2.xlsm
    87.8 KB · Affichages: 21
  • ILINO FSE 2014 V2.xlsm
    87.8 KB · Affichages: 28
  • ILINO FSE 2014 V2.xlsm
    87.8 KB · Affichages: 25

job75

XLDnaute Barbatruc
Re : Meme calenderie pour deux usf

Bonjour Ilino,

Mon ordi fixe avec Excel 2003 n'est pas disponible, et ça risque de durer.

Sur mon portable avec Excel 2010 le contrôle calendrier n'est pas disponible.

A+
 

Ilino

XLDnaute Barbatruc
Re : Meme calenderie pour deux usf

Forum Bonjour
Grazie MAITRE
ci joint la procedure a me confirmer
1. Dans un module je définis un objet public
Public ObjDate As Object
2.Dans les USF, avant d'appeler le calendrier, je définis l'objet conteneur devant recevoir la valeur
Private Sub date_arrivée_enter()

Set ObjDate = Me.date_arrivée
Calendrier.Show

End Sub
et
Private Sub TextBox17_enter()

Set ObjDate = Me.TextBox17
Calendrier.Show

End Sub
3. Dans le USF calendrier, je renvoies la valeur vers cet objet
Private Sub Calendar1_Click()
ObjDate = Me.Calendar1.Value ' Donne la valeur à l'objet définit
Unload Me
End Sub

Voila j'attend vos remarques
GRAZIE Bruno
A+
 
Dernière édition:
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…