Envoi de fichier par mail avec Windows Mail
#1
Accro XLPages

Inscription: 23/05/2008
De La Varenne Saint-Hilaire

Messages: 356

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 26-10-2009 17h59
Bonjour à tous,

Je sèche sur une macro consistant à envoyer un fichier par mail; pas douée en VBA mais l'instruction que j'utilisais jusqu'à présent (sur excel 2003 avec Outlook ou Groupwise comme messagerie) fonctionnait et était :
ActiveWorkbook.SendMail Recipients:="nom@mail.fr", Subject:="blabla "
Cette instruction ne fonctionne plus avec des ordinateurs installés avec Vista, excel 2003, et Windows Mail, le message d'erreur renvoyé est :

"Erreur d'exécution 1004"
La méthode "SendMail" de l'objet "Workbook" a échoué

J'ai tenté plein de choses en essayant de m'inspirer de ce que j'ai trouvé sur le net, pour l'instant j'en suis là :
chemin = ActiveWorkbook.Path & "\"
fic = ActiveWorkbook.Name
fichier = chemin & fic

 Dim Dest As String
 Dim Sujt As String
 Dim Msg As String
 
 Dest = "moi@monmail.fr"
 Sujt = "Test envoi avec Excel"
 Msg = "Bonjour blabla"
 
   Shell ("c:\Program files\Windows Mail\WinMail.exe /mailurl:mailto:") & Dest _
  & "? subject=" & Sujt & "&Body=" & Msg
 SendKeys "%I" & "p" & fichier & "~" & "%s" & "WinMail"
ce qui a l'inconvénient de lancer physiquement Windows mail dont je n'ai pas forcément besoin, (mais bon, pourquoi pas après tout), mais qui ne fonctionne pas jusqu'au bout, j'envoie mes "Sendkeys" dans le décor ...

Quelqu'un aurait-il une piste quelle qu'elle soit?

A tout hasard je joins mon fichier test, en vous remerciant d'avance pour votre aide éventuelle,

mth
Pièce jointe:
zip TEST ENVOI FICHIER.zip   [ Taille: 20.77 Ko - Téléchargements: 457 ]
Edité par Mth le 26/10/2009 19:19:56
Hors Ligne
Rapport   Haut 

Re: Envoi de fichier par mail avec Windows Mail
#2
Accro XLPages

Inscription: 09/01/2008
De Montréal, Québec

Messages: 463

Système d'exploitation:
PC
Version Excel utilisée:
97 à 2016
Posté le : 26-10-2009 18h52
Bonjour Mireille,

Juste un détail, quel est le client de courriel installé sur ton poste?
Je vois Windows Mail dans ton texte serait-ce le client de courriel par défaut sur Windows Vista : «Windows Mail un programme de messagerie électronique inclus avec Windows.»

Deuxièmement as-tu des réticences à utiliser une API (Une fonction qui provient d'une dll, t'expliquerai.)

Bref : ni Outlook, ni aucun autre client de courriel ou de programme de messagerie électronique n'est installé sur ce poste si ce n'est Windows Mail?

En attendant ta réponse je fouille un peu sur Windows Mail histoire de meubler mon neurone singulier.

Cordialement,

Guy


Hors Ligne
Rapport   Haut 

Re: Envoi de fichier par mail avec Windows Mail
#3
Accro XLPages

Inscription: 23/05/2008
De La Varenne Saint-Hilaire

Messages: 356

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 26-10-2009 19h17
Bonjour Guy,

Ravie de te retrouver et merci de de pencher sur mon problème...

Pour te répondre, effectivement, j'essaie de faire fonctionner ceci sur les ordinateurs portables de certains de nos collaborateurs, qui sont équipés de Vista et qui utilisent Windows Mail; c'est leur messagerie par défaut et ils n'ont que celle là pour l'instant.

Pour les API, aucune réticence ...  sourire.... mais il te faudra me guider car je n'y connais rien, je te promets simplement de faire tous les efforts pour essayer de comprendre.

J'espère que cela répond à tes questions, merci encore Guy et à plus tard,

Mireille.
Hors Ligne
Rapport   Haut 

Re: Envoi de fichier par mail avec Windows Mail
#4
Accro XLPages

Inscription: 09/01/2008
De Montréal, Québec

Messages: 463

Système d'exploitation:
PC
Version Excel utilisée:
97 à 2016
Posté le : 26-10-2009 19h22
Re-bonjour,

Alors commençons par ceci.

J'ai ajouté une procédure d'envoi nommée AllerHop() qui prend en charge à peu près ce que j'ai aperçu dans ta procédure Macro1().

Teste la chose et donne m'en des nouvelles.

Cordialement,

Guy
Pièce jointe:
zip TEST ENVOI FICHIER_Mod.zip   [ Taille: 21.68 Ko - Téléchargements: 490 ]

Hors Ligne
Rapport   Haut 

Re: Envoi de fichier par mail avec Windows Mail
#5
Accro XLPages

Inscription: 23/05/2008
De La Varenne Saint-Hilaire

Messages: 356

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 26-10-2009 20h19
re ,

Je viens d'essayer sur une machine, et ... tu vas rire ... j'ai fini par m'apercevoir qu'elle n'était sans doute pas bien paramétrée: les mails ne fonctionnent pas.

J'adore notre service informatique ...

Je vais donc essayer de joindre quelqu'un pour faire des tests à distance, (je ne suis pas sûre d'avoir quelqu'un ce soir car il est un peu tard, peut-être demain), et promis dès que j'ai réussi je te tiens au courant.

Merci encore Guy pour ton aide, et à très bientôt donc,

Mireille
Hors Ligne
Rapport   Haut 

Re: Envoi de fichier par mail avec Windows Mail
#6
Accro XLPages

Inscription: 09/01/2008
De Montréal, Québec

Messages: 463

Système d'exploitation:
PC
Version Excel utilisée:
97 à 2016
Posté le : 26-10-2009 21h04
Oups! La bourde.

Je n'avais pas remarqué que tu cherchais à envoyé le classeur.

J'ai consulté pour les options de ligne de commande avec Outlook Express, qui a les mêmes options.
Et, qui sait, une fois correctement configuré, ton classeur original fonctionnera peut-être.

Alors en attendant que le quelqu'un installe correctement Windows Mail je reste en attente et désolé pour l'embrouille.

Cordialement,

Guy



Hors Ligne
Rapport   Haut 

Re: Envoi de fichier par mail avec Windows Mail
#7
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 26-10-2009 21h36
Bonsoir Mth, Guy,

Peut-être une piste intéressante dans ce fil de chez PCastuces : la commande SendMail (VBA) ne fonctionne plus

A voir en particulier le post de Boogie Palace du 22/07/2009 à 17:44, et vérifier en premier lieu si le sous-menu d'Excel "Fichier/Envoyer vers" est présent - ou non - sur les postes en question.

Cordialement,

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: Envoi de fichier par mail avec Windows Mail
#8
Accro XLPages

Inscription: 23/05/2008
De La Varenne Saint-Hilaire

Messages: 356

Système d'exploitation:
PC
Version Excel utilisée:
2010
Posté le : 27-10-2009 22h45
Bonsoir Didier, Guy,

Résulat des courses aujourd'hui avec un premier essai:

- Vérification faite, l'envoi de mail fonctionne bien sur les machines, par le menu excel "Envoyer vers".

- Concernant ta procédure Guy, elle fonctionne, en ce sens qu'elle ouvre bien Windows Mail, elle place bien le destinataire l'objet et le message, puis s'arrête là.
Ce qui est déjà bien, mais resterait à placer le fichier en pièce jointe, et ... sourire.. je rêve peut-être un peu là ... mais serait-il possible que cette procédure envoie le mail sans forcément ouvrir Windows Mail ? ( si ce dernier point est trop compliqué, je serais déjà ravie de toute façon)

Encore merci pour votre intérêt, et à bientôt,

Mireille

Hors Ligne
Rapport   Haut 

Re: Envoi de fichier par mail avec Windows Mail
#9
Accro XLPages

Inscription: 09/01/2008
De Montréal, Québec

Messages: 463

Système d'exploitation:
PC
Version Excel utilisée:
97 à 2016
Posté le : 27-10-2009 23h01
Bonsoir Mireille,

Je vois. Comme je l'avais noté plus haut la procédure envoyée ne faisait qu'ouvrir le client de courriel par défaut.
Il traîne, sur le site de Laurent Longres un post de je fut, jadis, l'auteur que j'aimerais bien retrouver et qui portait d'assez près sur cette question.
Malheureusement ce site est planté depuis plus d'un an.

Alors je vais fouiller dans ma mémoire et avec Google pour voir si le rêve dont tu parles est possible avec Windows Mail
Si j'ai bien compris tu cherches à automatiser l'envoi du classeur sans y aller à la mimine , je zieute et te donne des nouvelles.

Cordialement,

Guy

Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes