Famille de systèmes de gestion de bases de données relationnelles Microsoft conçus pour être faciles à utiliser.
Cette réponse a été automatiquement traduite. Par conséquent, il peut y avoir des erreurs grammaticales ou des formulations étranges.
Salut Vincent,
Le code VBA suivant montre comment il parcourt chaque champ de jour (J1 à J31) et exécute votre requête SQL pour chaque jour :
Sub LoopDaysOfMonth()
Dim i As Integer
Dim strSQL As String
For i = 1 To 31
' Build the SQL query string
strSQL = "SELECT CS_COB.NOMMP, CS_COB.MATICLE, CS_COB.NANEE, CS_COB.MOIS, CS_COB.J" & CStr(i) & " " & _
"INTO t_resultatd" & i & " " & _
"FROM CS_COB " & _
"WHERE ((CS_COB.NANEE) LIKE '2025') AND ((CS_COB.MOIS) LIKE '03') AND ((CS_COB.J" & CStr(i) & ") NOT LIKE '1*');"
' Execute the query
DoCmd.RunSQL strSQL
Next
End Sub