Bonjour le forum,

Sur un Userform, j'ai un Label qui affiche la date du MonthView1, comme d'écrit ci dessous :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
Me.Lbl_DateSelectionnee.Caption = Format(Me.MonthView1.Value, "dddd d mmmm yyyy")
Comment récupérer la date du Lbl_DateSelectionnee.Caption au format : ,"dd/mm/yyyy") ?
Pour éffectuer une recherche de date sur une feuille excel avec :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
  Dim Ladate As String
 
  Ladate = Format(.Lbl_DateSelectionnee.Caption, "dddd d mmmm yyyy")
 
  If Ladate <> "" Then
    On Error Resume Next
    [A:A].Find(What:=Format(CDate(Ladate), "dd/mm/yyyy"), LookIn:=xlValues).Select
 
    If Err <> 0 Then
        MsgBox "Inconnu"
    Else
        MsgBox "connu"
    End If
  End If
Merci à ceux dont j'ai abusé de leurs temps pour lire ce post.
fasedan