Pendule Reveil Ancienne
Le Club n'affiche que des publicités IT, discrètes et non intrusives. Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur
× Attention, ce sujet est très ancien. Le déterrer n'est pas forcément approprié. Nous te conseillons de créer un nouveau sujet pour poser ta question.
enfin je ne suis pas un expert mais cela me semble étrange En esperant avoir pu t'aider un peu. Chipss EDIT: au temps pour moi l'adresse correspond à ta 2eme boite c'est ca? je pense pas que ca soit gerable de cette facon:/ 05/10/2010, 19h17 #4 Si je rentre l' adresse manuellement dans le champs De: manuellement(De:) cela fonctionne. Avec la macro, cela mets le fameux message. Je ne pense pas que ce soit un probleme de droit. Je ne sais pas comment faire pour resoudre ce probleme. merci d avance 06/10/2010, 11h44 #5 Mais tu as un champs 'De:' lorsque tu ouvre un nouveau mail?
Folders("Mailbox - Support") Set olItems = lders("Inbox")("[ReceivedTime] > '" & Date - 5 & "'") For i = To 1 Step -1 Rcd = 0 Set olItem = (i) Do Until If bject Like "*" & ("PROD_NUM") & "*" Then Rcd = rst. AbsolutePosition End If eNext Loop If Rcd = 0 Then If bject Like "*" & ("PROD_NAME") & "*" Then If Rcd > 0 Then Rcd If (("Account") = "xxxx") Or IsEmpty(("EmailAddress")) Then lders("AOR/non deliv") Cmpt2 = Cmpt2 + 1 Else Set nwItem = rward ' ***** C'est Ici qu'il me fait l'erreur **** ("EmailAddress") leteAfterSubmit = True Set nwItem = Nothing Cmpt1 = Cmpt1 + 1 Next = Cmpt1 = Cmpt2 Set olApp = Nothing Set olFold = Nothing Set olItems = Nothing Set olItem = Nothing End Sub Hors je confirme qu'avant j'ai jamais eu d'erreur là, et que tout est bien déclaré. La référence Outllook est bien déclaré, vu que j'ai d'autres fonctions qui elles fonctionnent toujours. Pour info: Access 2003, mais les DB sont en 2000; Outlook 2003 sous XP. Maintenant en vous écrivant je constate que le SP3 de Office à été fait, alors, éventuellement est-ce quelqu'un aurait vent d'un changent à ce sujet.