Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Faire envoyer un mail à Excel

Faire envoyer un mail à Excel

4 réponses
Avatar
Billy
Bonjour,

Voila mon soucis :

Je souhaiterais que Excel lors d'un changement de valeur d'une cellule,
celui-ci envoie un mail d'avertissement (en VBA) avec Outlook (Messagerie
entreprise).
Du type

Recipient **********
Subject "AVERTISSEMENT"
Message "La cellule "& *** & " a changer"

Le tout sans que le fichier en question ne soit envoyer lui même comme dans
les essais que j'ai réalisés jusqu'à maintenant. (Je ne voudrais pas porter
préjudice au quotas de boites E-mail).

Merci
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Philippe.R
Bonsoir Billy,
plusieurs solutions ici :
http://dj.joss.free.fr/web.htm
ou là :
http://www.excelabo.net/moteurs/recherche.php
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"Billy" a écrit dans le message de
news:c76c0g$gnq$
Bonjour,

Voila mon soucis :

Je souhaiterais que Excel lors d'un changement de valeur d'une cellule,
celui-ci envoie un mail d'avertissement (en VBA) avec Outlook (Messagerie
entreprise).
Du type

Recipient **********
Subject "AVERTISSEMENT"
Message "La cellule "& *** & " a changer"

Le tout sans que le fichier en question ne soit envoyer lui même comme dans
les essais que j'ai réalisés jusqu'à maintenant. (Je ne voudrais pas porter
préjudice au quotas de boites E-mail).

Merci




Avatar
Billy
plusieurs solutions ici :
http://dj.joss.free.fr/web.htm
ou là :
http://www.excelabo.net/moteurs/recherche.php



OK mais ces solutions me laisse un peu sur ma fin car ellles ont toutes pour
finalités l'envoi complet ou partiel du classeur. Perso je veux juste un
message san piece jointe...

Avatar
Philippe.R
Re,

OK mais ces solutions me laisse un peu sur ma fin car ellles ont toutes pour
finalités l'envoi complet ou partiel du classeur. Perso je veux juste un
message san piece jointe...


au moins pas celle ci :

Sub EnvoiUnMail()
Dim MailAd As String
Dim Msg As String
Dim Subj As String
Dim URLto As String
MailAd = Range("d1")
Subj = Range("d2")
Msg = Msg & Range("d3")
URLto = "mailto:" & MailAd & "?subject=" & Subj & "&body=" & Msg
ActiveWorkbook.FollowHyperlink Address:=URLto
End Sub


--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"Billy" a écrit dans le message de
news:c76d01$k40$
plusieurs solutions ici :
http://dj.joss.free.fr/web.htm
ou là :
http://www.excelabo.net/moteurs/recherche.php



OK mais ces solutions me laisse un peu sur ma fin car ellles ont toutes pour
finalités l'envoi complet ou partiel du classeur. Perso je veux juste un
message san piece jointe...





Avatar
Billy
au moins pas celle ci :

Sub EnvoiUnMail()
Dim MailAd As String
Dim Msg As String
Dim Subj As String
Dim URLto As String
MailAd = Range("d1")
Subj = Range("d2")
Msg = Msg & Range("d3")
URLto = "mailto:" & MailAd & "?subject=" & Subj & "&body=" & Msg
ActiveWorkbook.FollowHyperlink Address:=URLto
End Sub



Ah ! Ok vais essayer.
merci