Validation d'une date controle calendrier

Résolu
manuSP Messages postés 80 Statut Membre -  
manuSP Messages postés 80 Statut Membre -
Bonjour,

Voilà sur mon UserForm1, j'ai un bouton de commande qui ouvre mon Userform2 dans celui ci se trouve un controle calendrier, (pour la mise de la date à jour j'ai trouvé) je n'arrive pas à trouver le code qui me permettrait après avoir sélectionné un date, de valider cette date avec un bouton de commande de l'afficher dans une Textbox dans mon Userform1.

Merci

A voir également:

4 réponses

pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 765
 
Bonjour,

tu utilises l'évènement click de ton calendar (appelons le calendar1 dans l'exemple) :
Private Sub Calendar1_Click()
UserForm1.TextBox1.Value = Calendar1.Value
End Sub
0
manuSP Messages postés 80 Statut Membre
 
Merci ça fonctionne

J'ai un autre souci quand je clique sur mon bouton " valider" de mon userform2, j'aimerais revenir sur mon useform1 qui est déja ouverte le code que j'ai mis ne focntionne pas :

Private Sub CommandButton2_Click()
Load UserForm1
UserForm1.Show
End Sub

Ca écrit une erreur d'éxécution '400'

Merci
0
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 765
 
Oui, il faut "fermer" ton UserForm2
Private Sub CommandButton2_Click() 
UnLoad UserForm2 
UserForm2.Hide 
End Sub 

L'USF1 apparaitra alors car il n'est pas fermé...
0
manuSP Messages postés 80 Statut Membre
 
Encore merci
0