Re: XL Calendar dans TextBox d'un Userform |
Titre du sujet : Re: XL Calendar dans TextBox d'un Userform par Philmfr le 07/04/2011 06:30:31 Bonjour, Alors voilà quand je lance ma commande de néttoyage de mon Userform, il néttoie/vide bien tout sauf qu'il lance XlCalendar en Textbox "PériodeF" Private Sub Annuler_Click() 'vérifie que le classeur Bertille est le classeur actif 'sinon l'initialisation échoue Workbooks("Bertille.xls").Activate 'Vide les Combobox, vide les éléments de texte... agents = "" annule = "" PériodeD = "" PériodeF = "" gpa = "" commentaire = "" 'positionne sur "Faux" les cases à cocher matin = False aprèsmidi = False journée = False urgence = False End Sub Je pense que cela est normal car dans ce que tu as (très bien fait), Private Sub PériodeD_Change() 'Ferme le calendrier et le réouvre automatiquement pour la date de FIN (par défaut, à la même date) With PériodeF If .Text = "" Then .Text = PériodeD.Text etc.... Comment puis je éviter celà? changer ma méthode de néttoyage? y ajouter la fermeture de XLcalendar? Bien merci, Philippe |
Forums