• Initiateur de la discussion Initiateur de la discussion jules08
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

J

jules08

Guest
Bonjour,

Dans le code suivant :

ActiveWorkbook.SendMail Recipients:=Sheets("Fiche").Range("A1")

J'aimerai savoir commernt puis-je mettre un destinataire en copie automatiquement ainsi que le destinataire principal ?

Merci d'avance.
 
slt

Sub macro_mail()
Adresse = "adresse.email@exceldownload.com"
Sujet = "Défaut sur l'utilisation de " & Application.UserName
Texte = "Merci d'expliquer votre problème ici"
Shell "C:\Program Files\Outlook Express\msimn.exe " & "/mailurl:mailto:" & Adresse & _
"?subject=" & Sujet & "&Body=" & Texte
End Sub

Sub macro_lien_www()
Dim Link As String
Link = "http://www.excel.downloads.com"
On Error GoTo PasConnect
ActiveWorkbook.FollowHyperlink Address:=Link, NewWindow:=True
Exit Sub
PasConnect:
MsgBox "Impossible d'ouvrir " & Link
End Sub

c'est ca que tu voulait?

jmt0
 
re,

Sub macro_mail()
Adresse = "adresse.email@exceldownload.com" -> adresse du destinataire
Sujet = "Défaut sur l'utilisation de " & Application.UserName -> sujet du mail
Texte = "Merci d'expliquer votre problème ici" -> Le texte que tu veut faire apparaitre dans le mail
Shell "C:\Program Files\Outlook Express\msimn.exe " & "/mailurl:mailto:" & Adresse & _
"?subject=" & Sujet & "&Body=" & Texte
End Sub

Tu peut ne pas remplir "sujet" et "texte" c'est des options.

Je t'avais l'autre partie au cas ou tu veuille au si un lien pour le net
 
Bonjour jules08 et le forum,

En reprenant l'exemple de jmt0 :

Sub macro_mail()
(...)
Copie = "destinataire.copie@quelquepart.com"
Shell "C:\Program Files\Outlook Express\msimn.exe " & "/mailurl:mailto:" & Adresse & _
"?subject=" & Sujet & "&Body=" & Texte & "&Cc=" & Copie
End Sub


Slts

wally
 
Bonjour,

Ou as tu trouvé les infos concerant les paramètres a passer à msimn.exe .
Je n'ai pas trouvé de documentation sur cet executable (du type param attendu, option, code retour).

"/mailurl:mailto:" -> je ne connaissais pas les ":" (deux points) comme étant des commande DOS.
Que sont mailurl et mailto pour msimn ? des variables, des paramètres ?

Merci.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
10
Affichages
655
Réponses
5
Affichages
402
Réponses
2
Affichages
924
Réponses
12
Affichages
462
Retour