Exporter en pdf selon arborescence de dossiers

Nickel,

A ce stade je n’ai plus de soucis avec le pdf et le chemin d’accès est correctement renseigner avec l’extension.

Si je ne me trompe pas les derniers points bloquants sont les suivants :

  • Conservation de la mise en forme (couleur police, type police) des cellules « contenu » dans le corps du mail généré.

Actuellement tout est en Calibri 12 Noir malgré le fait que ma signature possède une mise en forme différente.

  • Insertion d’une image sous ma signature (elle n’apparait pas malgré le fait qu’elle se trouve dans le cellule

Une fois de plus merci à vous…!

Ravi de ce resultat
Pour la mise en forme je crains qu’Outlook ne puis les digérer de lui même
Seule l’intégration d’images en format html peut permettre cette mise en forme
Moi même lorsque je confectionne des Emails c’est la méthode que j’utilise
Mais d’Excel je crains que cela soit très difficile
N’ayant pas l’application Outlook pour tester je laisse la main à qui veut pour cette option
J’ai fait le maximum en mon pouvoir
Désolé

FFO,

Je vous remercie ! Je vais voir si quelqu’un peut m’aider à ce sujet.

Si ce n’est vraiment pas possible autrement que part l’intégration d’images en format html, savez-vous comment dois-je faire ? (je peux m’arranger pour que ma signature soit au format image).

Je peux récupérer des lignes de code appropriées mais impossible pour moi de les tester et donc de les adapter à ton besoin n’ayant pas Outlook
Tu peux toi même sur internet trouver des instructions appropriées les essayer et les mettre au point
En recherchant par ces mots :
vba excel envoi image par mail
Plusieurs sites offrent des solutions avec les instructions
A toi de les regarder de les récupérer de les adapter et les tester
Impossible pour moi

Je peux juste t’accompagner au grès de tes difficultés

C’est le mieux que je puisse faire hélas

Vous m’avez deja bien aidé !

Je vais explorer cette piste et vous ferez un retour dès que j’aurai une solution à mon problème !

Encore merci à vous pour ces pistes ainsi que pour votre temps

Ce fut un plaisir pour moi
A ta disposition quand tu veux

1 « J'aime »

la macro « Mail_Image » pour utiliser un jpg pour la signature
la plage nommée « Image_Signature » sera la signature
Exemple 1 EMAIL.xlsm (303,7 Ko)

Bonjour Cow18,

Votre solution fonctionne mais je trouve que la qualité de la signature est très diminuée…

Il doit exister un moyen de conserver la mise en forme d’Excel pour la partie coordonnées etc puis joindre l’image dans le corps du mail en dessous de la signature ?

vous avez un exemple de votre signature ? La qualité est perdu pendant la création du JPG ou dans la code HTML du body d’Outlook ?

Bonjour,

Malheureusement je ne peux pas partager ma signature…

Comment identifier l’origine du problème selon vos deux hypothèses ?

Re,

Après quelques recherches, j’ai trouvé cette idée : « créer dans le code VBA la signature en html, donc avec balises

… et comme pour le texte que tu veux insérer »

L’idée me semble intéressante mais je ne sais pas du tout comment procéder :roll_eyes:

Quelqu’un aurait une idée ?

Oups, soucis de mise en forme

Voici le texte que je voulais citer :

« créer dans le code VBA ta signature en html, donc avec balises table tr td… et img src= »…" comme pour le texte que tu veux insérer"

Autre solution possible :

« Il suffit simplement d’afficher le mail avant de le compléter et d’insérer de nouveau le corps du message » :

With oMailItem
    .Display
    .Subject = "Mon sujet"
    .To = "eMail_Destrinataire@fai.fr"
    .HTMLBody = "Bonjour, <br> bla bla bla <br>" & .HTMLBody
End With

Quelqu’un saurait me dire comment adapter ça au code actuel ?

Je vous remercie pour votre aide

Sub Mailen()
     Dim ol    As New Outlook.Application
     Dim olmail As MailItem
     Set ol = New Outlook.Application
     Set olmail = ol.CreateItem(olMailItem)
     With olmail
          .Display
          .Subject = "Mon sujet"
          .To = "eMail_Destrinataire@fai.fr"
          .Attachments.Add ThisWorkbook.Path & "\E68D88.png"     'ce fichier "png" se trouve dans ce sous-répertoire
          .HTMLBody = "Bonjour, <br> bla bla bla <br>" & "<img src=""cid:E68D88.png"" width=" & 150 & ">"
     End With

End Sub

pour la qualité de la signature, ceci est suffisant ? (l’image ici dessous, il faut le sauvegarder comme E68D88.png dans le même sous-répertoire que le fichier excel. (oubien choisir un autre image et adapter son nom dans la macro). Vous pouvez aussi modifier ce « 150 » du width pour agrandir l’image dans le mail.

Bonjour,

L’image s’insère de façon nette et j’ai réussi à paramétrer la bonne taille grâce à vos précisions.

Savez-vous comment intégrer uniquement la partie du code insérant l’image dans le code « mail » présent dans le module 4 du fichier ci-joint ?

Par ailleurs, dans ce fameux code, comment paramétrer la police, la couleur et la taille du texte ?

En effet, ma signature est compôsée d’une image et de mes coordonnées. Mais je ne voudrais pas que mes coordonnées apparaissent sous forme d’une image.

Ainsi, est-il possible de conserver, d’une manière ou d’une autre, d’affecter une mise en forme particulière à une portion de texte du mail ?

Je vous remercie pour votre aide.

Exemple 1 EMAIL.xlsm (1,3 Mo)

bonjour,
un lien pour les « tags » pour le bodyHTML HTML - Colors

2 macros, un avec un PJ « pdf » et un autre avec des « tags » pour changer le font ou le couleur.
Ce serait peut-être plus facile d’utiliser plusieurs cellules, par exemple AW44 pour le bonjour en rouge, puis AW45 pour n’importe quel texte et puis A46 pour le cordialement et monsieur …:
Pour le PJ dans la première macro, il y a 4 des 5 lignes à supprimer parce que je n’ai pas votre sous-répértoire, ce n’était que pour mon teste.

Vous voyez avec un BodyHTML, on peut faire n’importe quoi. Je ne sais pas ce que vous envoyez dans le pdf, mais si cela n’est pas trop grand, on peut l’aussi intégrer dans le body.
Exemple 1 EMAIL (2).xlsm (110,4 Ko)

Bonjour COW18,

Je ne me sens pas avancé avec ces éléments :smiling_face_with_tear:

A ce stade la macro de FFO faisait bien le travail et il ne manquait plus qu’a intégrer ma signature dans son code.

Savez-vous comment intégrer uniquement la partie du code insérant l’image dans le code « mail » présent dans le module 4 du fichier ci-joint ?

allez …
ajouter ligne 2&3 et supprimer ligne 4 (je ne l’ai pas testé)

          .Subject = Sujet                   'le sujet
          .Attachments.Add ThisWorkbook.Path & "\E68D88.png"     'ajouter votre signature comme PJ
          .HTMLBody = Replace(contenu, vbLf, "<br>") & "<img src=""cid:E68D88.png"" width=" & 397 & ">"     'transformer le body en HTML & intégrer signature
          '.Body = contenu                    'le contenu
          .Attachments.Add fichierpdf        'si piéce jointe

Exemple 1 EMAIL (2).xlsm (110,5 Ko)

Ce sujet a été automatiquement fermé après 30 jours. Aucune réponse n’est permise dorénavant.