Recherche entre 2 Dates

Bonjour,

Voici mon problème, sur mon UserForm j'ai une recherche entre 2 dates.

Quand je clic sur le Bouton "Rechercher" ça doit afficher toute les informations qui se trouve dans la feuille "PPCM" entre les 2 dates choisi et les copier dans la feuille "Recherche".

Cela fonctionnais sur mon PC avec Windows 7 et plus maintenant sur Windows 10.

Pouvez-vous m'aidez svp.

probleme avec la date apparemment

Private Sub CommandButton_Rechercher_Click()

Dim VdateDebut, VdateFin

If Not IsDate(Format(Me.TextBox1.Text, "dd/mm/yyyy")) Then

MsgBox "Veuillez saisir une date valide"

TextBox1 = ""

TextBox1.SetFocus

End If

Bonjour brutus01

Dans ton userform accueil, tu saisis les dates et le bouton rechercher fonctionne parfaitement chez moi .

Je suis sous windows 10 Familial

Quant à ta feuille Recherche, tu as "Rechercher entre 2 dates " qui n'est pas un bouton...donc qui ne peut rien faire

A voir

Bye

Salut Patty,

Bin écoute je ne comprend pas pourquoi alors, moi ça m'affiche un problème sur Format surligner en vert dans la ligne:

If Not IsDate(Format(Me.TextBox1.Text, "dd/mm/yyyy")) Then

MsgBox "Veuillez saisir une date valide"

TextBox1 = ""

TextBox1.SetFocus

End If

Re

Dans tes tests de validité supprime format et mets cela ....et vois

If Not IsDate(Me.TextBox1) Then
  MsgBox "Veuillez saisir une date valide"
   TextBox1 = ""
    TextBox1.SetFocus
 End If

A+

Rebonjour

J'ai vu un problème si tu entres une date fausse, donc fais plutôt cela :

If Not IsDate(Me.TextBox1) Then
  MsgBox "Veuillez saisir une date valide"
   TextBox1 = ""
    TextBox1.SetFocus
    Exit Sub
 End If

 If Not IsDate(Me.TextBox2) Then
  MsgBox "Veuillez saisir une date valide"
   TextBox2 = ""
    TextBox2.SetFocus
    Exit Sub
 End If

cad sors de ta sub si ta date est fausse sinon tu continues quand même après avoir effacé...

Bon courage

Re

essaie de mettre DateValue pour ta comparaison

DateValue(dateDebut)

idem pour ta date de fin

Pas de MP sans raison valable

merci

Merci Patty pour les réponses,

Cela ne fonctionne toujours pas, peut etre une mauvaise manip car je suis débutant peux tu essayer sur le fichier toi voir si ça viens de moi ?

re

Bon cela ne marche pas non plus

autofilter je ne connais pas

repose ta question avec ton problème car là je suis OUT

Tu as des gens plus calés que moi sur le sujet

Désolée