Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1474 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Outlook et excel

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Outlook et excel

n°1076756
FannyOnHea​t
Posté le 09-05-2005 à 18:40:50  profilanswer
 

Bonjour à tous, ;)  
 
Comment faire pour envoyer un mail via un userform d'excel?
 
Merci. :)  


---------------
FoH
mood
Publicité
Posté le 09-05-2005 à 18:40:50  profilanswer
 

n°1076793
knakes
Posté le 09-05-2005 à 19:25:47  profilanswer
 

Comme ça :

Code :
  1. Dim Ol As New Outlook.Application
  2. Dim OlMail As MailItem
  3. Dim CurrFile As String
  4. Set Ol = New Outlook.Application
  5. Set OlMail = Ol.CreateItem(OlMailItem)
  6. With OlMail
  7.    .To = destinataire_du_message ' (adresse email)
  8.    .Subject = sujet_du_message 
  9.    .Body = coprs_du_message
  10.    .Send ' Envoie la mail
  11. End With


Message édité par knakes le 09-05-2005 à 19:26:00
n°1076955
FannyOnHea​t
Posté le 09-05-2005 à 21:49:47  profilanswer
 

Merci je vais essayer ça...


---------------
FoH
n°1077682
FannyOnHea​t
Posté le 10-05-2005 à 12:57:47  profilanswer
 

erreur à ce niveau
Dim Ol As New Outlook.Application


---------------
FoH
n°1077739
gfa
Posté le 10-05-2005 à 13:36:40  profilanswer
 

FannyOnHeat a écrit :

erreur à ce niveau
Dim Ol As New Outlook.Application


Tu as réalisé écrit ta macro dans Excel ou dans Outlook?
 
Vu ta question du départ, je pense que c'est dans Excel. Il faut alors rajouter un référence à ton projet: Microsoft Outlook xx.x Object Library.
 
Le numéro de version peut différer selon les versions d'Office que tu as... Par exemple, pour Office XP (2002) c'est 10.0.
 
Voilà après cela devrait fonctionner.
 
A+

n°1078415
FannyOnHea​t
Posté le 10-05-2005 à 20:43:05  profilanswer
 

Merci, je rajoute ça où?
Microsoft Outlook xx.x Object Library


---------------
FoH
n°1078493
knakes
Posté le 10-05-2005 à 21:48:57  profilanswer
 

FannyOnHeat a écrit :

Merci, je rajoute ça où?
Microsoft Outlook xx.x Object Library


Tu vas dans Outils > Références.
 
Dans la liste, tu cherches 'Microsoft Outlook ... Object Library'


---------------
now : do nothing
n°1078516
FannyOnHea​t
Posté le 10-05-2005 à 21:58:28  profilanswer
 

OK merci, je vous tiens au courrant...


---------------
FoH
n°1079787
FannyOnHea​t
Posté le 11-05-2005 à 17:05:57  profilanswer
 

Ca marche! Merci à tous.


---------------
FoH
n°1082230
Crawdge
Posté le 13-05-2005 à 14:10:33  profilanswer
 

Moi j'ai presque pareil, ( http://forum.hardware.fr/hardwaref [...] 0019-1.htm) sauf que ca envoi pas le mail, pourtant le programme n'affiche pas d'erreurs...
 
Y'a rien a ajouter a par la Référence Microsoft outlook xx.x ... ?
Vous savez d'où ca pourrai venir ?

mood
Publicité
Posté le 13-05-2005 à 14:10:33  profilanswer
 

n°1083957
maverick25​1
Posté le 15-05-2005 à 10:46:16  profilanswer
 

Comment envoyer une feuille dans un message en VBA?(testé avec Excel 2003)
Sub MailFeuilleOE()
Dim Dest, Sujt, Msg As String
Dim RepName
ActiveSheet.Copy
ActiveWorkbook.SaveAs Filename:="C:\temp\test.xls"
RepName = "C:\temp\test.xls"
Dest = "dj@free.fr"
Sujt = "Test d'envoi d'une feuille avec Excel"
Msg = "Bonjour, Excel vous envoie une feuille avec OE"
Shell "C:\Program Files\Outlook Express\msimn.exe " & _
"/mailurl:mailto:" & Dest & "?subject=" & Sujt & "&Body=" & Msg & ""
SendKeys "%I" & "p" & RepName & "~" & "%s"
ActiveWorkbook.Close
End Sub

n°1086250
Crawdge
Posté le 17-05-2005 à 08:32:26  profilanswer
 

Merci, ca à l'air de bien marcher ca !
Peut on cependant enlevé automatiquement le correcteur d'orthographe ?
 
Merci encore ;)

n°1156766
fab531
Posté le 22-07-2005 à 08:58:13  profilanswer
 

salut ton code est genial pour envoyé un mail
et j'aurai aimer savoir si tu avait un bout de code pour pouvoir recupere un mail d'une boite au lettre outlook!
ou si tu pouvait m'aider a trouver une solution merci

n°1169195
jpcheck
Pioupiou
Posté le 03-08-2005 à 17:56:26  profilanswer
 

excusez-moi de faire le mauvais, mais quelqu'un a-t-il un lien pour télécharger cette librairie qui n'est manifestement pas disponible sur ma machine :sweat:  
Merci d'avance

n°1169618
AlainTech
Pas trouvé? Cherche encore!
Posté le 04-08-2005 à 05:31:08  profilanswer
 

Le fichier, c'est msoutlxx.olb.
Où le xx représente le numéro de version.


---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!
n°1169715
jpcheck
Pioupiou
Posté le 04-08-2005 à 11:19:09  profilanswer
 

bon alors le pb que j'ai, c'est que j'ai pas installé outlook 2003 avec office 2003, je suis resté à la version outlook express, ca pourra fonctionner? :cry:

n°1169769
AlainTech
Pas trouvé? Cherche encore!
Posté le 04-08-2005 à 12:45:57  profilanswer
 

Outlook Express N'EST PAS Outlook!!!!
 
Par contre, je pense qu'il doit bien y avoir un composant pour utiliser Outlook Express.
Je vais voir si je trouve qqch.
Peut-être quelqu'un en a-t-il l'expérience et viendra te le dire avant moi.


---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!
n°1169771
AlainTech
Pas trouvé? Cherche encore!
Posté le 04-08-2005 à 12:47:34  profilanswer
 

Je viens de voir, plus haut, que le code de maverick251 est fait pour OE!


---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!
n°1169810
jpcheck
Pioupiou
Posté le 04-08-2005 à 13:37:28  profilanswer
 

AlainTech a écrit :

Je viens de voir, plus haut, que le code de maverick251 est fait pour OE!


mille excuses à ceux qui ont cherché pour rien, j'ai trouvé mon bonheur  :sweat:  
merci alaintech en tt cas :hello:

n°1222875
KeysMaster
Posté le 14-10-2005 à 10:59:09  profilanswer
 

Le code de maverick251 m'a bien été utile. Mais j'ai encore trois petites questions
 
- J'aimerai savoir s'il y a possibilité de rajouter une ligne de code pour mettre un PJ au fichier (autre que je fichier Excel où il y a la macro) ? Si oui laquelle et à quel endroit ?
- Est ce que c'est faisable que l'envoi de mail se fasse automatiquement sans avoir à cliquer sur envoi dans OE
- J'ai pas trouvé (certainement mal cherché) si la même manip est faisable avec Microsoft Outlook 2003. Si c'est faisable est ce que quelqu'un à le code équivalant ou le lien avec le post concerné ?


Message édité par KeysMaster le 14-10-2005 à 12:54:20

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Outlook et excel

 

Sujets relatifs
Lire une feuille excel .xls depuis VB.NETFusion word depuis une Macro Excel
Ouvrir un fichier Excel via AccessActivation d'un fichier Excel Ouvert
Executer un formulaire sous Outlook facilement ?Importation fichier texte en excel avec plus de 256 colonnes
excel formules probleme de baseAide Excel et Outlook
[VBA] exporter des données excel dans outlookOuvrir un mail outlook depuis un bouton Excel/VBA ???
Plus de sujets relatifs à : Outlook et excel


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR