Probleme avec access

Bonjour, voila en faite j'ai une db qui regroupe des projets avec un % d'accompli. Il faud que quand ce % change, 3 email sois envoyer. Le probleme c'est que ici sur les 3 mails, il y en a que 1 qui est envoyer. Mon code en Vba est bon mais il y a une erreur dans le code Sql. Voici les codes :


Vba :

Option Compare Database

Private Sub Completed_Percentage_Change()
If Me.Completed_Percentage = 1 Then
Me.Actual_Completion_Date = Now()
Else
Me.Actual_Completion_Date = Null
End If

Dim NotesDB As Object
Dim NotesDoc As Object
Dim NotesRTF As Object
Dim NotesSession As Object

Set NotesSession = CreateObject("Notes.NotesSession")
Set NotesDB = NotesSession.GetDatabase("", "")

Call NotesDB.OpenMail

TTT = Me.Parent.[TTT Project Number].Value
PC = Me.Parent.[E-mail].Value
Analyst = Me.Parent.[E-mail].Value
Tester = Me.Parent.[E-mail].Value
Milestone = Me.MilestoneID
MilestoneName = Me.Milestone_Name
MilestoneValue = Me.Completed_Percentage

Set NotesDoc = NotesDB.createdocument
Call NotesDoc.replaceitemvalue("Sendto", PC & ", " & Analyst & ", " & Tester)
Call NotesDoc.replaceitemvalue("Subject", TTT & " - Milestone updated")

Set NotesRTF = NotesDoc.CreateRichTextItem("body")
Call NotesRTF.appendtext("In project " & TTT & " milestone " & Milestone & " (" & MilestoneName & ") has been updated to " & MilestoneValue)

Call NotesDoc.Send(False)

Set NotesSession = Nothing

End Sub


Sql :

SELECT [TTT Projects].[TTT ProjID], [TTT Projects].[Project N°] AS [TTT Project Number], CUST_References_Live.procod AS Procod, IIf/sword([TTT Projects]!Procod,IIf(IsNull([Traffic Type]),CUST_References_Live.name,CUST_References_Live.name+&­quot; ["+[Traffic Type]+"]")+" ("+CStr(Schedule![Slot Nb])+"/"+CStr([Number of slots per TTT Proj ID]![Number of Slots])+")") AS Processor, CUST_References_Live.country_iso_code AS Country, Schedule.[Act Mig day], Schedule.[Slot Nb] AS Slot, CUST_References_Live.name AS PC, [Staff contact details_1].Name AS Analyst, [Staff contact details_2].Name AS Tester, [TTT Projects].[Project Type], [TTT Projects].[Lifecycle Indicator], Schedule.[Ideal Mig Day], InStr([Project Type],"TBC")>0 AS TBC, [Staff contact details].[E-mail], [Staff contact details_2].[E-mail] AS [Tester E-mail], [Staff contact details_1].[E-mail] AS [Analyst E-mail]
FROM (((((([TTT Projects] LEFT JOIN CUST_References_Live ON [TTT Projects].Procod = CUST_References_Live.procod) LEFT JOIN Schedule ON [TTT Projects].SchedID = Schedule.SchedID) LEFT JOIN [Number of slots per TTT Proj ID] ON [TTT Projects].[TTT ProjID] = [Number of slots per TTT Proj ID].[TTT ProjID]) LEFT JOIN Assignments ON [TTT Projects].[TTT ProjID] = Assignments.[TTT ProjID]) LEFT JOIN [Staff contact details] ON [TTT Projects].PC = [Staff contact details].Acronym) LEFT JOIN [Staff contact details] AS [Staff contact details_1] ON Assignments.Analyst = [Staff contact details_1].Acronym) LEFT JOIN [Staff contact details] AS [Staff contact details_2] ON Assignments.Tester = [Staff contact details_2].Acronym
WHERE ((([TTT Projects].[Project Type]) Not In ("BAU","Contingency Slot")) AND (([TTT Projects].[Lifecycle Indicator]) In ("Assigned","Started")))
ORDER BY Schedule.[Act Mig day];

Il y a donc une table TTT Projects qui regroupe tout les information sur les projets.
une donner (PC) relier a (acronym) dans la table staff contact details (le mail qui par).
une donner (TTT ProjID) relier a (TTT ProjID) dans la table assignements qui assigne qui est le tester et qui est l'analyst (qui son les 2 mail qui ne s'envoie pas).
et oui j'oublier la table staff contact details et la table qui repertorie les adresses mail.

cette queries, ce n'est pas moi qui l'ai faite est pour etre franc je sais pas trop comment ca marche, moi je me debrouille en basic mais pour le Sql suis nul. Ci quelqu'un pouvai m'aider a trouver d'ou vien le probleme, pourquoi il y a que 1 mail qui par au lieu des 3 ca serai pratique.