XL 2016 macro pour envoyer une feuille excel par mail en pièce jointe

david58

XLDnaute Nouveau
bonjour
j'aimerais pouvoir envoyer par mail une feuille d'excel en cliquant sur un bouton de commande
j'utilise ce code vba :
Sub macro 18()
Dim Destinataires(1) As String,Sujet As String
Dim AccuseReception As Boolean
Destinataires(1)="une adresse mail@......)
Sujet="Nouvelle commande"
AccuseReception=True
ThisWorkbook.Sheets("Nom de la feuille").Copy
ActiveWorkbook.SendMail Destinataires,Sujet,AccuseReception
Active Workbook.Close False
End Sub
Mon problème est que la feuille se copie bien mais je n'ai pas l'envoi du mail
j'utilise pour l'envoi une boite mail sous gmail avec un nom de domaine (croix rouge française)
je pense qu'avec cette adresse mail je suis bloqué par l'administrateur du domaine
comment faire pour contourner ce problème?
d'avance merci pour vos aides
cordialement
 

xUpsilon

XLDnaute Accro
Bonjour,

Au vu des règles du forum en ce qui concerne le débloquage de fichiers sécurisés, j'aurais tendance à dire que l'aide pour contournement d'une norme de sécurité n'est pas tolérée non plus.

Je pense qu'il faut que tu t'adresses d'abord à la bonne personne : ton administrateur de domaine.

Bonne journée,
 

Discussions similaires

Réponses
7
Affichages
550
Réponses
2
Affichages
608

Statistiques des forums

Discussions
314 708
Messages
2 112 097
Membres
111 416
dernier inscrit
philipperoy83