Envoi d'un fichier excel par mail à partir de ce même fichier ?
Résolu
Izuw
Messages postés
8
Date d'inscription
Statut
Membre
Dernière intervention
-
jordane45 Messages postés 38486 Date d'inscription Statut Modérateur Dernière intervention -
jordane45 Messages postés 38486 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
Je travaille sur un formulaire qui sera téléchargeable via un site internet.
Ma fiche est quasi finie mais comme on s'adresse à un panel de professionnels du corps médical qui (par définition) n'a pas de temps à perdre..
J'aurais aimé inclure un "bouton" dans mon fichier qui l'enverrait automatiquement à une adresse mail prédéfinie..
Existe t'il le moyen de le faire via une macro par exemple ? Ou autre ?
Merci d'avance de me dire si c'est possible et comment y parvenir !!
Je travaille sur un formulaire qui sera téléchargeable via un site internet.
Ma fiche est quasi finie mais comme on s'adresse à un panel de professionnels du corps médical qui (par définition) n'a pas de temps à perdre..
J'aurais aimé inclure un "bouton" dans mon fichier qui l'enverrait automatiquement à une adresse mail prédéfinie..
Existe t'il le moyen de le faire via une macro par exemple ? Ou autre ?
Merci d'avance de me dire si c'est possible et comment y parvenir !!
A voir également:
- Envoi d'un fichier excel par mail à partir de ce même fichier ?
- Fichier bin - Guide
- Fichier epub - Guide
- Comment réduire la taille d'un fichier - Guide
- Fichier rar - Guide
- Fichier .dat - Guide
1 réponse
Bonjour,
Par macro tu pourrais faire ceci :
Par macro tu pourrais faire ceci :
Sub EnvoiMail() Dim adresseMailDestinataire As String adresseMailDestinataire = InputBox("Indiquez votre adresse mail..") If adresseMailDestinataire <> "" Then ThisWorkbook.SendMail Recipients:=adresseMailDestinataire, _ Subject:=ThisWorkbook.Name, _ ReturnReceipt:=True End If End Sub
Déjà merci pour votre réponse mais malheureusement j'ai deux soucis..
Le premier c'est que je n'ai pas la possibilité d'ajouter une pièce jointe mais ça encore c'est pas très grave.
Par contre, j'ai surtout un message d'erreur dans VB qui m'indique "Erreur d'exécution '1004': Panne générale de la messagerie. Quitter Microsoft Office Excel, redémarrez le système de messagerie et réessayez."
Une autre possibilité serait d'utiliser CDO .. et de te servir d'une adresse mail type Gmail...
Le souci.. c'est que l'utilisateur pourra aller regarder sans souci le code dans ton classeur et ainsi accéder à ta boite mail....
Sans oublier que l'utilisateur devra.. quoi qu'il arrive.. autoriser l'exécution des macros...(quelque soit la solution choisie..)
Sinon.. elle ne se lancera pas !
Après.. il reste la solution du "mailto" ....
Mais là encore.. il faudra que ton utilisateur dispose d'un logiciel de messagerie installé et configuré sur son poste.....
Regardes ici :
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#email