1 bouton pour enregistrer une feuille sous.. la transformer en pdf l'envoyer par mail

  • Initiateur de la discussion Initiateur de la discussion Matjul
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Matjul

XLDnaute Occasionnel
Bonjour à tous,
J'ai télécharger PDFCreator mais je ne sais pas quel code utiliser.
En fait, je souhaiterai qu'en cliquant sur un seul bouton, toutes les actions suivantes se fassent:
- Transformer le Feuil1 en pdf
- Envoyer ce pdf par mail à des destinataires
- Enregistrer ce pdf sous la date du jour dans le dossier "C:/Récapitulatif/"
- Imprimer ce pdf

Peut importe l'ordre de réalisation pourvu que toutes ces actions se fassent.

J'ai recherché les autres fil sur ce sujet mais je n'en ai pas trouvé qui faisaient tout en même temps.

Merci beaucoup pour votre aide.
 
Envoyer un pdf en pièce jointe

Bonjour à tous,
Malgré toutes mes tentatives, je n'ai toujours pas compris comment fonctionne le code ci dessous:
Code:
' Add files as attachement
    Set objAttachments = objMessage.Attachments
    For i = LBound(tabFiles) To UBound(tabFiles)
        If Not (IsNull(tabFiles(i)) Or tabFiles(i) = "") Then
            ' Test file exist
            If fso.fileexists(tabFiles(i)) Then
                ' Add attachement
                objAttachments.Add Right(tabFiles(i), Len(tabFiles(i)) - InStrRev(tabFiles(i), "\")), 0, , tabFiles(i)
            End If
        End If
    Next

Mon problème est que je souhaite que le fichier en pièce jointe dans le mail soit le pdf que j'ai enregistré et non le fichier xls.

Quelqu'un pourrait il m'aider?

Merci pour tout
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Retour