Insertion pdf dans outlook 2016 via VBA

  • Initiateur de la discussion Initiateur de la discussion MR.O
  • 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 !

MR.O

XLDnaute Junior
Bonjour,

Je souhaiterais insérer un PDF qui est enregistrer sur mon bureau vers Outlook 2016 (office 365) mais je n'y parviens pas il ne sélectionne pas mon fichier PDF sur le bureau. Savez-vous comment faire ?

Merci d'avance,

Cordialement,

Mr.O
 

Pièces jointes

Bonsoir MR.O et bienvenue sur XLD 🙂

Cette ligne n'est pas correcte: .AddAttachment "C:\Users\SO250810\Desktop\commande transport " & v & ".pdf"

Vu que tu as ceci : doc = "C:\Users\SO250810\Desktop\commande transport " & v & ".pdf"

.Attachments.Add doc

EDIT: j'ai corrigé plus ou moins le code, ne sachant pas quelle feuille tu copie. Tu avais en plus deux fois l'ouverture d'outlook avec les même lignes.
 

Pièces jointes

Re

Ok. J'ai vu. mais pourquoi ces lignes??

Selection.Copy
Sheets("carnet d'adresses").Select
Range("A90").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

Que viens faire cette feuille dans l'histoire?? 🙄
 
Re

J'ai modifier la cellule du transporteur en la mettant en K1, en I1 c'est le numéro qui vient s'incrémenter. J'ai modifié aussi la macro pour inserer tous les destinataires dans Outlook, suivant le nom recherché. J'ai fait un test, pour moi c'est OK.

Note: n'inscrit rien en I1, le numéro s'affichera automatiquement.
 

Pièces jointes

- 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

Discussions similaires

Retour