Bonjour a tous !  
 
mon pitit probleme : j'avais une macro sous acces qui fonctionnait tres bien merci. Bon. Et maintenant elle me dit  
"Type de données incompatibles avec l'expression des critères".  
 
Soit. Mais moi il me semble que tout mes criteres sont bien exprimés et que mes données sont sous le bon format (nom des champs sont bons, les années sont en texte mais ca ne posait pas de probleme jusqu'à présent)
 
Est ce qu'une ame charitable saurait de quel type d'incompatibilité on parle ? ca m'aiderait surement ...
 
merci bcp !
 
je vous ai mis mon bout de code des fois que vous ayez l'oeil plus vif que moi ...  
 
 
Dim RecordsetPFAC, MyRecordset As Recordset
Dim req, codeReport As String
Dim num_colonne As Integer
Dim nbdde As Long
Dim nbddetel As Long
Dim nbcourrier As Long
Dim nbcourrierm4j As Long
Dim i As Integer
 
 
fichier = "F:\Tableaux de Bord-Pilotage Statistique\Stats mensuelles activite\Procédure pour le reporting mensuel\maquettes Reporting\maquette_Synthese_PRU.xls"
TabExcel.Visible = True
 
With TabExcel
.Workbooks.Open (fichier)
.Worksheets("maquette synthese" ).Select
 
.Worksheets("maquette synthese" ).Copy after:=Worksheets("lancement" )
.Worksheets("maquette synthese (2)" ).Name = "TdB Synthese " & mois & " " & annee
.Worksheets("TdB Synthese " & mois & " " & annee).Select
.Cells(2, 5).Value = moisenlettre & " " & annee
'Requete sur TABLE_REPORT
 
'Recordset de la liste des PFAC
req = "select Code_Report, Num_colonne_Synthese FROM PFAC;"
Set RecordsetPFAC = MyDB.OpenRecordset(req, dbOpenDynaset)
 
' on fait dérouler la liste PFAC
Do Until RecordsetPFAC.EOF
  codeReport = RecordsetPFAC!Code_Report
  num_colonne = RecordsetPFAC!Num_Colonne_Synthese
 
 
 
 'nb courriers recus
 'mois
  req = "select TABLE_REPORT.VALEUR_INDICATEUR AS NBCOUR FROM TABLE_REPORT WHERE TABLE_REPORT.NOM_INDICATEUR ='COUREC'" _
  & " AND TABLE_REPORT.PFAC='" & codeReport & "' AND TABLE_REPORT.MOIS=" & mois & " AND TABLE_REPORT.ANNEE =" & annee & ";"
  Set MyRecordset = MyDB.OpenRecordset(req, dbOpenDynaset)
  .Cells(36, num_colonne).Value = MyRecordset!nbcour

as-tu une ligne indiquée où ca te jette?

oui l'avant dernière :  
 
Set MyRecordset = MyDB.OpenRecordset(req, dbOpenDynaset)  
 
mais je pense que mes critères au dessus sont bons, ma macro fonctionnait ... le problème doit plutôt venir des données mais elles me paraissent similaires à celles que j'utilisais avant (fichier texte importé)...

ah ba apparemment c bon : mes donnees années étaient enregistrées en texte au lieu d'etre en numerique ...  
 
merci quand meme bcp jpcheck