Discussion :

[zoltix]

Bonjour,
J'ai reçu un email, il y a bien longtemps. Je ne me souviens pas de grand-chose sauf de la tranche d'heure que je l'ai reçu/envoyé.
Donc je suis en train de chercher comment je dois faire pour trouver cet email.
Je n'arrive pas a mettre au point mon critère de recherche.
J'aimerais avoir comment chercher dans tous les emails reçus entre 17h et 24h, dans l'inbox pour tous les jours.
Je pensais écrire un truc du style

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Receved  on after 17:00 and  Received  on before 23:59

mais problème il ne recherche que sur les jours actuelles.

Merci d'avance de votre aide

[francky74]

Salut,

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
19
20
21
Sub NewAccountRequest()
 
Dim myOlApp As New Outlook.Application
Dim myNamespace As Outlook.NameSpace
Dim myInbox As Outlook.Folder
Dim myItems As Outlook.Items
Dim myItem As Object
Dim oMail As MailItem
Set myNamespace = myOlApp.GetNamespace("MAPI")
Set myInbox = myNamespace.GetDefaultFolder(olFolderInbox)
Set myItems = myInbox.Items
Dim strName As String
 
For Each oMail In myInbox.Items
MsgBox oMail.Body     'm'aide à rechercher dans Outlook l'email pointé par la macro
    If oMail.LastModificationTime = "Date recherchée" Then
        strName = myItem.EntryID
       Set myItem = myItems.GetNext
    End If
Next myItem
End Sub

Avec ceci, tu pourras passer tous tes mails un à un et avec LastModificationTime, tu peux voir la date d'arrivée
Mais pour une tranche horaire ... c'est autre chose