Cela ne marche toujours pas.
du coup j'avais trouvé ceci
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim ol As Object, monmail As Object
DisplayAlerts = False
Set ol = CreateObject("outlook.application")
Set monmail = ol.CreateItem(olMailItem)
monmail.To = "jnhjk@njrgs.com"
monmail.Subject = "Test Macro Nouveau RDV"
monmail.Body = "Bonjour un nouveau RDV a été trouvé. Merci de consulter le fichier PSR."
monmail.Send
Set ol = Nothing
End Sub
et il marche sauf que je recois un mails lorsque toutes les cellules sont modifiées.
Je cherche à lui specifier la colonne.