salut à tous ,
j'aimerais écrire un code qui permet à la saisie d'un nombre de verifier s'il a été déja saisie.
voici la fonction mais elle ne marche pas
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Public Function Rech(leCode As String) As Boolean
  Dim Requete As String
   Rech = False
        Set Requete = "Select numerocheque from TBL_EDITIONCHEQUE "
    For Each leObjet In laColFactRegle
        If Requete = laColFactRegle.Count Then
            MsgBox "Ce numero de chèque a été deja saisi,veuillez entrer un autre numero", vbInformation, vgTitreApplication
        Else
         Rech = True
        End If
    Next
End Function
merci d'avance