Discussion :

[kstorfou]

Bonjour,
Je suis nouveau sur le forum et ça fait un petit moment que je me suis mis au vba sous excel pour développer ce qui s'avère etre une grosse application mais je suis confronté à un tout petit problème. Le genre de problème que d'habitude se résout facilement en cherchant un peu mais là je comprends vraiment pas...

Je m'explique :
J'ai une macro qui lance un userform de la manière suivante:

Code :

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

1
2
3
4
5
Sub Macro6()
 
UserForm10.Show
 
End Sub

Ce qui ouvre ce UserForm:


Qui comprend donc deux controles DatePicker et dans lequel j'ai rentré ces codes:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Public Date1 As Date
Public Date2 As Date
 
Sub CommandButton1_Click()
    Unload Me
End Sub
Private Sub DTPicker1_Change()
        Date1 = UserForm10.DTPicker1.Value
        MsgBox Date1
End Sub
Private Sub DTPicker2_Change()
        Date2 = UserForm10.DTPicker2.Value
End Sub

Malheureusement qd je fais appel aux variables Date1 et Date2 dans une macro quelconque (ce que je peux faire normalement vu que je les ai déclarées public), elles sont vides:


Pourquoi ? Comment y remédier ?

Merci !

[casefayere]

Bonjour,

j'ai essayé ton code et ta form dans un classeur vide, j'ai mis dans un module vierge

Code :

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

1
2
3
4
5
Public Date1 As Date
Public Date2 As Date
Sub essaidate()
MsgBox Date1
End Sub

dans le code USF

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub CommandButton1_Click()
essaidate
End Sub
 
Private Sub DTPicker1_Change()
Date1 = DTPicker1.Value
MsgBox Date1
End Sub
Private Sub DTPicker2_Change()
Date2 = UserForm10.DTPicker2.Value
End Sub

la date apparait

a+

[kstorfou]

Merci beaucoup de ta réponse si rapide !

Elle m'a permi de me rendre compte de mon erreur à savoir que j'avais déclaré mes variables Date1 et Date2 dans l'USF... Je comprends pas vraiment ce que ca change mais au moins maintenant ca marche !



@+

[casefayere]

Content d'avoir découvert le problème (ça m'arrive pas souvent)

mais enfin, quand je poste, ça aide quelquefois

Bonne journée