XL 2010 Macro VBA envoi mail + pièce jointes

saoudi

XLDnaute Nouveau
Bonjour à tous,

je souhaite créer une macro qui me permettrait d'envoyer un mail de base à plusieurs personnes ( des personnes en destinataire, d'autre en cc) ayant pour chaque personne une pièce jointe différente..
Pouvez-vous svp m'aider? J'ai essayé de créer une macro mais elle ne fonctionne pas
Les différents fichiers à envoyer aux destinataires sont sur un réseau commun.



merci par avance
 

Fichiers joints

fhoest

XLDnaute Accro
Bonjour,
à première vu il manque .send pour l'envoi.
j'ai regardé vite fait donc si ç'est pas ça je regarderai en détail.
A bientôt.
 

saoudi

XLDnaute Nouveau
Un grand merci pour ta rapidité !
L'erreur affichée est "erreur de compilation" dès le début au niveau du "sub envoiemail"..
 

fhoest

XLDnaute Accro
Que veux tu dire par la :
Code:
.Attachments.Add "R:\Envoi controle budgetaire\OUT 2020-08\Pour envoi" & Lien
ActiveWorkbook.Path 'ici pourquoi ça ??
Activeworkbook.Path ne fait pas partie de l'objet donc cela retourne une erreur c'est normale.
 

saoudi

XLDnaute Nouveau
il s'agit de l'endroit (réseau commun) ou le fichier se trouve.
C'est certain, que j'ai fais beaucoup d'erreur dans le codage...

Merci pour ton aide
 

fhoest

XLDnaute Accro
Merci, je sais ce que veux dire cette instruction, ma question n'était pas de savoir ce que voulais dire cette ligne, mais pourquoi le ActiveWorkbook est la entre le with et End with
la variable lien = address ? donc l'attachement est ok ? non ?
si tu enlève l'instruction act...path ça doit fonctionner.
et mettre
Code:
.Attachments.Add  Lien
A+
 

saoudi

XLDnaute Nouveau
La macro fonctionne je vous remercie !!!!

Dernière question, j'ai quand même un message d'erreur " l'indice n'appartient pas à la sélection" à chaque fois qui me renvoie à cette ligne "Lien = Range("C" & Ligne).Hyperlinks(1).Address"
 

fhoest

XLDnaute Accro
Oui
est ce que la ligne = 4 et C4 = "" dans ce cas il y a une erreur car pas de lien.
c'est ce que je pense.
il faut tester avant si non vide.
A+
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas