Bonjour,
Je souhaite renseigner dans un état le champ nomé "Hrec" par la fonction HeuRécuo() VBA. La requête doit retouver le temps correspondant pour un intervenant, un travail et une date donné. Je ne maitrise pas le SQL sous VBA.
Comment d'après cette requête, renseigner le champs "Hrec"

Voici mon code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
Private Function HeuRécup()
Dim dhDate As Date
Dim dhInter As String
Dim strSQL As String
 
    dhDate = Me.[Date]  
    dhInter = Me.IDIntervenant
 
       strSQL = "SELECT [T-Fiche].Temps FROM [T-Fiche] WHERE ((([T-Fiche].IDIntervenant)=" & dhInter & ") AND (([T-Fiche].Date)=" & dhDate & ") AND (([T-Fiche].IDTRavail)=17));"
 
If IsNull(strSQL) Then
    HeuRécup = 0
    Else
    HeuRécup = strSQL
End If
 
End Function
Merci pour les réponses
Molène34