IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Envoi de mail avec signature par VBA


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Janvier 2011
    Messages
    69
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2011
    Messages : 69
    Par défaut Envoi de mail avec signature par VBA
    Bonjour à tous du forum, j'aimerais inclure ma signature dans un e-mail que j'envoie par VBA dans Excel. J'ai essayé une méthode que j'ai trouvé chez Ron Debruin, mais cela ne fonctionne pas. J'ai suivi les instructions, et j'ai adapté le code selon mes besoins, mais j'ai peut-être manqué quelque chose. Ou si quelqu'un a une autre méthode, je serais preneur. Si besoin est, je joindrai la partie du code pour mieux comprendre.

    Merci à l'avance de votre aide,

    Claude

  2. #2
    Membre éclairé
    Profil pro
    Inscrit en
    Mars 2011
    Messages
    46
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2011
    Messages : 46
    Par défaut
    Voici ma méthode (qui marche chez moi) et qui me paraît très (trop?) proche de celle de Debruin:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    Sub EnvoiMail()
     
        Dim OutlookApp As Object
        Dim Mail As Object
     
        Set OutlookApp = CreateObject("Outlook.Application")
        Set Mail = OutlookApp.CreateItem(0)
     
        With Mail
            .To = "mon destinataire"
            .CC = "mes copies"
            .Subject = "Sujet"
            .BodyFormat = olFormatHTML
            .HTMLBody = "Bonjour,<br><br>" & GetBoiler("C:\Documents and Settings\ma_signature.htm")
            .Send
        End With
     
        Set Mail = Nothing
        Set OutlookApp = Nothing
     
    End Sub
     
    Function GetBoiler(ByVal sFile As String) As String
        Dim fso As Object
        Dim ts As Object
        Set fso = CreateObject("Scripting.FileSystemObject")
        Set ts = fso.GetFile(sFile).OpenAsTextStream(1, -2)
        GetBoiler = ts.readall
        ts.Close
    End Function

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Janvier 2011
    Messages
    69
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2011
    Messages : 69
    Par défaut
    Merci Groslou2 pour ta réponse, je vois que tu as mis GetBoiler dans ta feuille alors que je l'ai mis dans un module standard tel que spécifié dans le site de Ron Debruin. Je vais essayer ta méthode et revenir pour le résultat.

    Après avoir fait quelques ajustements à mon code, tout fonctionne très bien.

    Merci beaucoup de ton aide,

    Claude

  4. #4
    Membre confirmé
    Profil pro
    Inscrit en
    Janvier 2011
    Messages
    69
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2011
    Messages : 69
    Par défaut
    Bonjour à tous, j'ai un petit souci pour ma signature. Je dois dire que j'ai dans ma signature une image avec ma carte d'affaire. En faisant des tests, j'ai découvert que si Outlook est déjà ouvert, il s'ouvre une seconde fois (c'est ainsi fait dans le code), et l'image de ma carte est visible. Par contre, si Outlook n'est pas déjà ouvert, l'image de ma carte n'est pas visible. On voit bien qu'il y a quelque chose, mais il y a un X rouge et cela me dit qu'il y a un problème avec l'image. Quelqu'un a peut-être une solution à me proposer...

    Merci,

    Claude

  5. #5
    Membre éclairé
    Profil pro
    Inscrit en
    Mars 2011
    Messages
    46
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2011
    Messages : 46
    Par défaut
    La signature est un .html?
    Si oui, à quoi ressemble la balise image <img> associée à la signature? En particulier, est-ce qu'un chemin absolu ("C:\...") et non relatif est spécifié pour la source (src=...)? Pour voir tout ça il faut ouvrir le fichier signature avec le bloc-note par exemple.

  6. #6
    Membre confirmé
    Profil pro
    Inscrit en
    Janvier 2011
    Messages
    69
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2011
    Messages : 69
    Par défaut
    Citation Envoyé par groslou2 Voir le message
    La signature est un .html?
    Si oui, à quoi ressemble la balise image <img> associée à la signature? En particulier, est-ce qu'un chemin absolu ("C:\...") et non relatif est spécifié pour la source (src=...)? Pour voir tout ça il faut ouvrir le fichier signature avec le bloc-note par exemple.
    Bonjour groslou2, j'ai ouvert le fichier signature.htm et vers la fin il y a ceci:
    src="Skyport_fichiers/image001.jpg" v:shapes="_x0000_i1025"><![endif]><o:p></o:p></p>.

    J'imagine que c'est ce dont tu parles?

    Merci,

    Claude

  7. #7
    Expert confirmé
    Avatar de hackoofr
    Homme Profil pro
    Enseignant
    Inscrit en
    Juin 2009
    Messages
    3 844
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : Tunisie

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Juin 2009
    Messages : 3 844
    Par défaut
    vous pouvez consulter ce lien pour avoir plus d'idées
    Cordialement !

Discussions similaires

  1. Envoi de mail avec signature Outlook.
    Par Richard_35 dans le forum VBA Outlook
    Réponses: 11
    Dernier message: 27/03/2015, 16h19
  2. [XL-2007] envoi e-mail avec outlook en vba
    Par thibautewbank dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 20/02/2012, 17h27
  3. Envoi de Mail avec Signature HTML
    Par Yaz dans le forum API standards et tierces
    Réponses: 7
    Dernier message: 07/08/2006, 10h44
  4. [VBA-A] Envoi de mail sans passer par Outlook ou autre.
    Par genius99 dans le forum VBA Access
    Réponses: 4
    Dernier message: 21/02/2006, 07h50
  5. Envoi de mail avec pièce attachée par SMTP
    Par yess78 dans le forum IIS
    Réponses: 4
    Dernier message: 09/12/2005, 13h33

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo