e-mailing excel / thunderbird

Anonyme
2017-10-31T15:56:52+00:00

Bonjour,

je reviens vers vous avec une nouvelle question. J'ai cherché un peu sur le net mais j'ai du mal à appliquer ce que je trouve, mes connaissances en VBA étant très très basses.

A partir d'un fichier excel, je cherche à faire partir des mails avec des pièces jointes différentes pour chaque ligne de destinataire.

J'utilise Thunderbird comme serveur de messagerie.

Et histoire d'en demander un peu plus, si ma 1e demande est réalisable, est-il possible de faire en sorte qu'apparaisse sur l'excel la date de l'envoi de l'email.

J'ai déposéICIun exemple de ce que j'avais en tête. Il me faut juste rajouter dans la colonne "contrat" le scan du document correspondant. 

d'avance, merci

Emma

Microsoft 365 et Office | Excel | Pour la maison | Windows

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires Aucun commentaire

24 réponses

  1. DanielCo 107.1K Points de réputation
    2017-11-04T14:56:16+00:00

    Est-ce que tu mets un sujet et un corps sur chaque ligne, oou est-qu'il faut répéter celui de la première ligne ?

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  2. DanielCo 107.1K Points de réputation
    2017-11-04T14:54:27+00:00

    Bonjour Daniel,

    ça marche !!!!!

    avec juste (encore) un petit souci:  la pièce jointe ne part pas avec le mail.

    Merci;

    Emma

    Où se trouvent le nom et le chemin de la pièce jointe ?

    Danniel

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  3. Anonyme
    2017-11-04T12:40:16+00:00

    re-bonjour,

    un autre petit souci a pointé le bout de son nez:

    j'ai fait un essai avec plusieurs lignes et donc plusieurs destinataires sur l'excel, seul le 1e a le texte demandé ( sujet et corps)

    Merci

    Emma

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  4. Anonyme
    2017-11-04T12:28:35+00:00

    Bonjour Daniel,

    ça marche !!!!!

    avec juste (encore) un petit souci:  la pièce jointe ne part pas avec le mail.

    Merci;

    Emma

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  5. DanielCo 107.1K Points de réputation
    2017-11-04T11:34:29+00:00

    Bonjour,

    Remplace la macro Test :

    Sub test()

      Dim C As Range

      For Each C In Range("A2", Cells(Rows.Count, 1).End(xlUp))

        SendThunderbird C.Offset(, 3).Value, C.Offset(, 8).Value, C.Offset(, 9).Value

        C.Offset(, 7) = Date

      Next C

    End Sub

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire