Alerte Excel outlook

Bonjour à tous,

Je me permets de venir vers vous afin de recueillir vos précieux conseils notamment sur la mise en place d'une alerte depuis excel via outlook.

Le tableau que j'ai créé comporte 8 colonnes. La colonne A renseigne l’adresse mail de la personne en charge du projet, la colonne B, l’expéditeur, cad moi. La colonne C correspond au numéro du marché et la colonne D à l’objet du contrat. La colonne E est un message qui est destiné à alerter le porteur de projet 3 mois avant l'expiration du contrat qui figure en colonne H. Les colonnes F renseigne sur la date de conclusion du contrat et la G sur la date à laquelle le msg doit être envoyé.

Après avoir réalisé ce tableau, celui-ci a été importé dans outlook en passant par un mappage des champs du message.

Ce message apparaît bien dans un dossier destinataire dans outlook, mais je ne sais pas comment créer une alerte automatique à partir des dates inscrites en colonne G.

Je joins le fichier excel à l'envoi

Si quelqu’un parmi vous à la solution..

Je vous remercie pour votre aide

Mimi48

Bonjour,

A mettre dans le module du classeur (ThisWorkbook) :

Private Sub Workbook_Open()

    Dim Plage As Range
    Dim Cel As Range

    With ActiveSheet

        Set Plage = .Range(.Cells(2, 7), .Cells(.Rows.Count, 7).End(xlUp))

    End With

    For Each Cel In Plage

        If Cel.Value = Date Then

            MsgBox "Le projet '" & Cel.Offset(, -4).Value & _
                    "' arrive à expiration le " & Cel.Offset(, 1).Value & vbCrLf & _
                    "Situé sur la ligne '" & Cel.Row & "' !"

        End If

    Next Cel

End Sub

Hervé.

Bonjour Hervé

Un grand merci à vous pour votre retour. Je vais tester et je reviendrai vers vous.

A très bientôt