Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Word > VBA Word
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 12/04/2006, 17h40   #1
Membre confirmé
 
Avatar de zemeilleurofgreg
 
Inscription : mars 2006
Messages : 469
Détails du profil
Informations personnelles :
Âge : 36

Informations forums :
Inscription : mars 2006
Messages : 469
Points : 271
Points : 271
Par défaut [VBA-W]Envoyer le document actif par mail

Bonjour,

je crée un formulaire en word dans lequel il y a des champs à remplir ainsi qu'un bouton et j'aimerais que ce bouton envoie le document en question par mail à une adresse bien précise.

Quel est le code VB pour ce bouton?

Merci d'avance.
zemeilleurofgreg est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 12/04/2006, 17h47   #2
Responsable Visual Basic
 
Avatar de bbil
 
Inscription : juin 2003
Messages : 11 773
Détails du profil
Informations personnelles :
Âge : 45
Localisation : France, Ariège (Midi Pyrénées)

Informations forums :
Inscription : juin 2003
Messages : 11 773
Points : 16 849
Points : 16 849
Envoyer un message via Skype™ à bbil
un truc du genre :

Code :
 ActiveDocument.SendMail
bbil est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 12/04/2006, 17h50   #3
Membre confirmé
 
Avatar de zemeilleurofgreg
 
Inscription : mars 2006
Messages : 469
Détails du profil
Informations personnelles :
Âge : 36

Informations forums :
Inscription : mars 2006
Messages : 469
Points : 271
Points : 271
j'ai déja essayé mais ça marche pas,
il me faudrais du code dans lequel je stipule l'adresse d'envoi.
zemeilleurofgreg est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 12/04/2006, 17h55   #4
Membre Expert
 
Avatar de Megaxel
 
Inscription : mai 2003
Messages : 1 188
Détails du profil
Informations forums :
Inscription : mai 2003
Messages : 1 188
Points : 1 308
Points : 1 308
Regarde ce post:
http://www.developpez.net/forums/viewtopic.php?t=435793&highlight=envoyer+mail+outlook

Pour la pièce jointe, un "ActiveDocument" doit faire l'affaire.
Pour le destinataire, au lieu de mettre la cellule Excel, tu mets... l'adresse mail du destinataire.
Megaxel est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 13/04/2006, 09h50   #5
Membre confirmé
 
Avatar de zemeilleurofgreg
 
Inscription : mars 2006
Messages : 469
Détails du profil
Informations personnelles :
Âge : 36

Informations forums :
Inscription : mars 2006
Messages : 469
Points : 271
Points : 271
Bonjour,

merci pour ta réponse, mais ça marche pas non plus.
j'ai une erreur de compil qui me dit :

USER - DEFINED TYPE NOT DEFINED

concernant ceci :
Code :
1
2
3
    Dim outApp As New Outlook.Application
    Dim Dest As Outlook.Recipient
    Dim Msg  As Outlook.MailItem
Merci beaucoup.
zemeilleurofgreg est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 13/04/2006, 09h55   #6
Membre Expert
 
Avatar de Megaxel
 
Inscription : mai 2003
Messages : 1 188
Détails du profil
Informations forums :
Inscription : mai 2003
Messages : 1 188
Points : 1 308
Points : 1 308
Il faut ajouter, dans les références, "Microsoft Outlook x.xx Object Library"
Megaxel est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 13/04/2006, 11h59   #7
Membre confirmé
 
Avatar de zemeilleurofgreg
 
Inscription : mars 2006
Messages : 469
Détails du profil
Informations personnelles :
Âge : 36

Informations forums :
Inscription : mars 2006
Messages : 469
Points : 271
Points : 271
ok
merci beaucoup, ça marche!!

a+
zemeilleurofgreg est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 19h17.


 
 
 
 
Partenaires

Hébergement Web