Envoi de mail : Dysfonctionnement macro suite migration OFFICE 365 Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
t
talami
Jeune membre
Jeune membre
Messages : 32
Inscrit le : 21 novembre 2012
Version d'Excel : 2010

Message par talami » 22 février 2018, 17:29

Rebonjour,
Alors, j'ai fait une avancée et crois savoir d'où vient le problème.
J'ai l'impression que la fonction .Display ne fonctionne en raison d'une sécurité. Lorsque j'utilise directement .Send, le mail est correctement envoyé avec la pièce jointe.
Avez-vous une idée sur ce point?
Merci.
Avatar du membre
i20100
Passionné d'Excel
Passionné d'Excel
Messages : 5'479
Appréciations reçues : 311
Inscrit le : 16 mars 2017
Version d'Excel : 2010

Message par i20100 » 22 février 2018, 18:51

Bonjour,

avez-vous appliqué les correctifs mentionné sur cette page:
https://support.office.com/fr-fr/articl ... r-FR&ad=FR
Vive ces nouvelles saisons qui nous colorent.
isabelle
t
talami
Jeune membre
Jeune membre
Messages : 32
Inscrit le : 21 novembre 2012
Version d'Excel : 2010

Message par talami » 23 février 2018, 11:50

Bonjour,
Le problème est transmis à ma DSI.
Ils vont vérifier les différentes sécurités appliquées en interne.
Je vous tiens informé.
Merci pour votre aide.
t
talami
Jeune membre
Jeune membre
Messages : 32
Inscrit le : 21 novembre 2012
Version d'Excel : 2010

Message par talami » 7 mars 2018, 17:43

Bonjour,
J'ai trouvé d'où venait le problème.

With Mail
.Display ==> cette expression se trouvait dans la version précédente juste avant le END WITH mais la nouvelle version exige qu'on fasse l'appel du MAILITEM et ensuite on exécute les autres expression les unes après les autres. (effectivement plus logique)
.To = "backoffice.drf@unibail-rodamco.com"
.Subject = TempFileName 'Format(Now, "yyyymmdd") & "_" & Format(Now, "hhmmss") & "_" & Forecast.Caption
.Body = "Bonjour," & vbCrLf & vbCrLf _
& "Veuillez trouver ci-joint le fichier des prévisions à intégrer dans Diapason." & vbCrLf & vbCrLf _
& "Cordialement. " & vbCrLf
.Attachments.Add fichierTemp1
.Attachments.Add fichierTemp2
End With
t
talami
Jeune membre
Jeune membre
Messages : 32
Inscrit le : 21 novembre 2012
Version d'Excel : 2010

Message par talami » 7 mars 2018, 17:43

Merci pour votre aide.
Avatar du membre
i20100
Passionné d'Excel
Passionné d'Excel
Messages : 5'479
Appréciations reçues : 311
Inscrit le : 16 mars 2017
Version d'Excel : 2010

Message par i20100 » 8 mars 2018, 18:50

par talami: J'ai trouvé d'où venait le problème.

Merci talami pour ce retour, au plaisir!
si le problème est résolu, s.v.p. pour clôturer le fil, cliquer sur le bouton V vert du post à coté du bouton EDITER, merci!
Vive ces nouvelles saisons qui nous colorent.
isabelle
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message