Macro+excel+pdf+outlook

Résolu
eric2027 -  
Bonjour le Forum
Est-il possible de faire une macro sur excel qui ferait automatiquement un pdf et transférererais ce dernier vers outlook
Par avance, merci pour vos réponses
Cordialement

16 réponses

Résumé de la discussion

Faisabilité d'une macro Excel capable de générer automatiquement un PDF et de l'envoyer par Outlook, sous Windows 7 et Firefox 44.0, au cœur des échanges. Des échanges techniques indiquent qu'il faut préciser quelle plage ou nom d'onglet Excel exporter en PDF et comment configurer l'envoi automatisé par Outlook ou via CDO/SMTP. Des propositions évoquent que le PDF est généré à partir d'un fichier Excel et qu'un exemple de fichier anonymisé faciliterait l'avancée tout en précisant les paramètres utilisés. En cas de poursuite, des contraintes réseau et serveur peuvent bloquer l'envoi, orientant la démarche vers des solutions locales et des tests pratiques, avec ajustements éventuels selon l'infrastructure.

Bobot (l’IA à votre service)
  2. eric2027 Auteur
    Ne comprenant pas grand chose à l'anglais, y a t il la traduction de cet ouvrage en français ou équivalent.
    Merci

    Cordialement
    1. f894009
      Re,
      Vous connaissez le VBA au moins ?
      Dans le bas de la page, téléchargez le zip
    2. eric2027 Auteur
      malheureusement, pas du tout
    3. f894009
      @eric2027Re,
      Donc, ce n'est pas la langue anglaise qui pose problème!!
      Demain matin, je vous mets un fichier avec le plus d'infos possible en français
      À+
    4. eric2027 Auteur
      Je vous remercie pour votre aide
      Je bidouille, des fois ça marche, des fois pas
      @+
    5. f894009
      @eric2027Bonjour,

      Question: le PDF est fait a partir de quoi ??
  3. Mike-31
    Bonjour,

    pour écrire un code il faut avoir des données très précises, quelle plage ou nom de l'onglet Excel veux tu expédier en PDF
    ensuite il est possible d'expédier le fichier en CDO plus facile et rapide à expédier parce qu'on utilise directement le SMTP de l'opérateur
    commence par donner des précisions sur ton projet après on verra ce qu'il est possible de te proposer, mieux joint un exemple de fichier anonymisé à partir de ce lien
    https://www.cjoint.com/
    1. eric2027 Auteur
      Bonjour Mike-31
      C'est le fameux fichier ou tu m'avais créé des formules pour calculé le résultat des semaines
  6. f894009
    Re,

    En attendant, un exemple de creation fichier PDF du classeur et envoi par Outlook avec code de RondeBruin commentaires en francais

    https://www.cjoint.com/c/FCqh3LTzEZf
    1. eric2027 Auteur
      RE,
      Je n'arrive pas à lire votre fichier, il me fait des caractères bizarre
    2. f894009
      @eric2027Re,

      Pour recuperer le fichier, clic sur le lien, ensuite dans fenetre cijoint clic droit sur le lien, enregistrer la cible
    3. eric2027 Auteur
      Ouah, c'est hyper complexe à comprendre, je vais regarder et faire des test
      Mais y a t-il une traduction de l'ouvrage ?
      Encore merci
    4. f894009
      @eric2027Re,

      c'est hyper complexe à comprendre, Non, pas vraiment, sauf si vous n'y connaissez rien
      Mais y a t-il une traduction de l'ouvrage ? En dehors des commentaires, non

      J'attends de voir ce que Mike-31 vous propose pour continuer, pas deux sur le sujet si Mike-31 vous donne satisfaction

      la seule chose qu'il faut lui preciser c'est si vous tenez a passer par Outlook ou pas
  7. Mike-31
    Re,

    ton VBA est protégé par un mot de passe si tu ne le donnes pas ou met un fichier non protégé à disposition

    A+
    Mike-31

    Une période d'échec est un moment rêvé pour semer les graines du savoir.
    2. Mike-31
      Re,

      quel est ton fournisseur d'accès à internet que je te retourne le fichier
      1. Mike-31
        Tu peux me donner ton fournisseur d'accès ou le SMTP de ton fournisseur s'il te plait que je te retourne le fichier
      2. eric2027 Auteur
        Pour moi c'est du charabia, j'ai outlook
    3. Mike-31
      Ton fournisseur d'accès est l'opérateur qui te permet de te connecter au Web comme Orange, Free etc ...
      quel est donc ton opérateur !
      A+
      Mike-31

      Une période d'échec est un moment rêvé pour semer les graines du savoir.
      1. eric2027 Auteur
        orange
    4. Mike-31
      Re,

      télécharge ton fichier et pour essai saisir en Y12 l'adresse mail de l'expéditeur éventuellement la tienne, en Y14 l'adresse mail du destinataire éventuellement la tienne et clic sur le rond bleu
      si le fichier répond à tes attentes on mettra les adresses dans des constantes

      http://dl.free.fr/getfile.pl?file=/ebZLglmC
      1. eric2027 Auteur
        ça me marque en message "Le transport a échoué dans sa connexion au serveur"
      2. Mike-31
        tu es sur que ton fournisseur d'accès est bien orange, pas wanadoo

        recherche dans ton Outlook le SMTP voir ss c'est bien SMTP.orange.fr
      3. eric2027
        Je crois que j'ai compris pourquoi cela ne fonctionne pas, je suis sur réseau et cela bloc au niveau du serveur
    5. Mike-31
      Re,

      répond aux questions
      es tu sur que ton fournisseur d'accès est bien orange, pas wanadoo chez cet opérateur ça peut être l'un ou l'autre

      ensuite cela peut également venir du numéro du port

      télécharge ce fichier et renseigne les cellules Y12 et Y14 avec les adresses mail et clic sur le bouton bleu et explique ce qui se passe

      https://www.cjoint.com/c/FCqmgUUcPIj
      1. eric2027
        Même résultat qu'au dessus
      2. eric2027
        Je me suis renseignement auprès des gens du serveur, c'est bien orange, mais ils nous bloquent, nous ne pouvons que transférer de poste à poste, décidément, plus aucune liberté d'agir.
        Donc, je vais partir sur un pdf automatique avec la macro et le transférer manuellement, quelle avancée au 3ème millénaire, je suis frustré et honteux de t'avoir fait faire tout ce travail
    7. Mike-31
      Re,

      alors pour créer simplement un fichier PDF

      Sub CopieEnPDF()
      '---------------------------------------Création du fichier temporaire
      ActiveSheet.Unprotect ("b304")
      Application.DisplayAlerts = False '-------Annulation des alertes
      chemin = ActiveWorkbook.Path
      nom = "Copie" & ".PDF" 'nom du nouveau classeur dans cellule et définir extension si différente d'application
      ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
      ActiveWorkbook.Path & "\" & nom, Quality:=xlQualityStandard, _
      IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
      False
      '---------------------------------------Appel procédure d'envoi
      Application.DisplayAlerts = True '-------rétablissement des alertes
      ActiveSheet.Protect ("b304")
      End Sub
      1. eric2027 Auteur
        ça marche pas, ça me beug
    8. Mike-31
      Re,

      Bizarre, je viens de retester le code et pas de problème
      1. eric2027 Auteur
        il me cadre bien pour les mises en pages pdf puis plus rien, est ce que j'ai mal interprété le code que tu m'as envoyé, je ré-essaye
    9. cs_Le Pivert Contributeur
      Bonjour à tous,

      Pour enrgistrer en PDF, il a déjà eu la réponse!

      https://forums.commentcamarche.net/forum/affich-33278294-pdf-automatique#2
      1. eric2027 Auteur
        Effectivement, j'ai déja eu un code mais il ne me prend pas de page 1 à 1, il me fait la totale même quand je le paramètre dans imprimer
      2. cs_Le Pivert Contributeur
        @eric2027Il faut sélectionner la feuille qui t'interesse!!!!!!!!!!!!
      3. eric2027 Auteur
        ok, je n'avais pas fait attention aussi peut on avoir la fenêtre qui permets de renommer le pdf, cela me ferai gagner un maximum de temps sinon, il faut que je retourne dans le dossier, renommer etc...
        Encore merci
    10. eric2027 Auteur
      Sub impress_pdf()

      Application.ActivePrinter = "PDFCreator sur Ne01:"

      ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate _
      :=True
      End Sub