OVH Cloud OVH Cloud

Envoi d'une sheet dans le corps d'un mail

24 réponses
Avatar
Super
Bonjour,

J'ai vu dans le forum qu'il y avait beaucoup de littérature sur le sujet
avec un spécialiste avéré : Papou.

Moi, je souhaiterai envoyer un fichier avec ma worksheet dans le corps de
mon mail et non en document joint. Sur le net, j'ai beaucoup lu sur les
contrôles MAPI, mais truc très bête, je ne connais pas la référence à fournir
à mon débuggeur pour qu'il reconnaisse ces objets...
J'ai tenté de lui ajouter dans les références :
C:\Program Files\Common Files\System\Mapi\1033\msmapi32.DLL, mais il n'en
veut pas ("Can't add a reference to the specified file"...)

J'ai un exemple de code sous la main pris sur Excelabo, mais les objets ne
sont donc pas reconnus et je ne sais pas ce que session représente..

Sub mail_par_vba()

'réponse de H. S. le lundi 13 décembre 1999 13:06
'newsgroup : microsoft.public.fr.excel
'discussion : Envoi de mail à partir d'Xl

'RAJOUTER UNE REFERENCE AU CONTROLE MAPI

Dim myMessage As New MAPIMessages
Dim mySession As New MAPISession

mySession.UserName = "Hamard Stephane"
mySession.Password = "ZazaAsLesYeuxVertsSelonJ@C"
mySession.SignOn
myMessage.SessionID = mySession.SessionID


myMessage.Compose
myMessage.RecipAddress = "shamard@totoworld.fr"
myMessage.MsgSubject = "Resultat " & Format(Date, "dd/mm/yy")
myMessage.MsgNoteText = "Salut Zaza"
myMessage.AttachmentType = 0
myMessage.AttachmentName = "Fichier test"
myMessage.AttachmentPathName = "c:persotemptest.txt"
myMessage.ResolveName

On Error Resume Next
'Je n'arrive pas à intercepter la fermeture de la fenêtre...
'donc j'utilise la gestion d'erreur (pas très bon).
myMessage.Send True

mySession.SignOff
End Sub

4 réponses

1 2 3
Avatar
michdenis
Bonjour Super,

Ces 2 lignes de code permettent de lancer ta connection Internet ... je suppose que ceci est valide seulement tu as une
connection par téléphone et que tu doives ouvrir la connection avant d'envoyer un message.

'Je suppose que tu dois lui donner ton nom d'utilisateur que ton fournisseur Internet t'a donné pour te connecter
mySession.UserName = "Hamard Stephane"

Ici c'est le mot de passe nécessaire pour établir la connection . Si tu as une connection par cable, donc ta connection
toujours ouverte, tu peux simplement inhiber ces 2 lignes en mettant une apostrophe devant.
mySession.Password = ""

Si tu veux connaître tous les objets, méthodes et propriétés de cette bibliothèque, tu peux les visualiser via
l'explorateur d'objet de la fenêtre vbe - tu n'as qu'à choisir la bonne bibliothèque dans la liste déroulante pour voir
apparaître tous les objets dans le bas de la fenêtre.

Pour ce qui est du reste de la macro, elle s'exécute très bien chez moi. Est-ce qu'elle répond à ce que tu demandes ...
c'est une autre histoire.

Si cela fonctionne, j'aimerais que tu confirme la chose.


Salutations!










"Super" a écrit dans le message de
news:

Merci Michdenis, j'y suis presque !!!
Il me reste à savoir quoi mettre ici :
Je ne sais pas ce que sont des sessions mapi et donc ce qu'elles requièrent...

mySession.UserName = "Hamard Stephane"
mySession.Password = ""

Après, j'ai bon espoir que le reste tourne !!

"michdenis" wrote:

à cette adresse, tu peux récupérer ces 3 fichiers :

http://www.dpi.ufv.br/downloads/C++%20Introductory%20Edition/VCB600ENU1/OS/SYSTEM/

MSMAPI.SRG , MSMAPI32.DEP , MSMAPI32.OCX


Tu les copies dans le Répertoire : C:WindowsSystem32


Après, tu initialises la base de registre :

Bouton de la barre des tâches "Démarrer" / commande exécuter et tu copies cette ligne de code :

regsvr32.exe c:WindowsSystem32 MSMAPI32.OCX

Le chemin doit être le même que celui où tu as copié les fichiers.


Après l'exécution de la commande, tu devrais avoir un message disant que la chose s'est bien passée.

Si cela ne fonctionne pas ....C'est que ce type de procédure requiert "Visual Basic le programme"

Il faut chercher ailleurs ce que tu veux faire !



Salutations!






"Super" a écrit dans le message de
news:
Salut Michdenis

Bon en ce qui me concerne, msmapi32.dll se trouve dans
: "C:Program FilesCommon FilesSystemMapi1033" et mon VBE refuse de
l'intégrer dans ses références.
Du coup, je ne peux malheureusement pas passeer aux étapes suivantes...
Sais tu ou je peux récupérer sinon cette dll ?

"michdenis" wrote:

Bonjour JPS, Super,

Dans VBE (visual basic editor), à partir de la barre des menus de cette fenêtre, outils / référence / si vous
utilisez


le bouton parcourir pour ouvrir la référence msmapi32.dll ou msmapi32.ocx , Est-ce que la référence se charge dans
la


fenêtre ? Apparaît-elle cochée ? Si oui, ouvrez l'explorateur d'objet à partir du bouton de commande de la barre
d'outils Standard de la fenêtre VBE et dans la première liste déroulante, celle affichant "Toutes les bibliothèques"
Est-ce qu'une nouvelle bibliothèque s'est ajouté au nom ressemblant à : "MSMAPI" ? Si, oui, la procédure devrait
fonctionner ! Il se peut que le contrôle issu de la barre d'outils "Contrôle" ne soit pas disponible sans "Visual
Basic"

mais si la bibliothèque est chargée, le code devrait pouvoir s'exécuter si il est chargé dans un module standard.
Sinon

pourquoi Bilou aurait pris la peine d'inclure cette bibliothèque ?


Salutations!



"jps" a écrit dans le message de
news:OaCo2s$


le plus marrant, c'est que moi je l'ai bien cet ocx mais ça ne marche pas
mieux pour autant...denis doit avoir des acquaintances avec le Seigneur...
jps

"Super" a écrit dans le message de
news:
Oulalalala...
Ca m'a l'air compliqué cette affaire !!!
Bon, ben, moi non, plus, je n'ai pas ce fameux msmapi32.ocx
J'ai juste un msmapi32.dll qui ne veut pas être référencé.
Bon, ben tant pis... Si vous pensez à quelquechose sans mapi, je suis
preneur...
Merci beaucoup en tout cas.

"isabelle" wrote:

on peut le télécharger ici http://www.zerohack.it/downloads/ocx.htm,
mais comme il n'est pas correctement licencié c'est


impossible de l'utiliser. :-(

isabelle


non Denis il n'est pas présent,

isabelle


Bonjour Isabelle,

Je suis présentement sur Excel 2002 et Windows Pro Xp

'Dans Excel, la librairy ajouté au programme s'appelle Library
MSMAPI Tel que vu dans l'explorateur d'objet de la




fenêtre VBE (liste déroulante Librairy)

Le nom du fichier est : MSMAPI32.OCX

et il est situé là : C:WINDOWSSystem32

Est-il présent si le programme Visual Basic n'est pas installé ?

Salutations!

"isabelle" a écrit dans le message de
news:




salut Denis,

il n'est pas sur ma liste non plus, connais tu son nom de fichier
(x.ocx ou x.dll) ?





isabelle


Bonjour JPS,

Sur mon ordi, j'ai visual basic (le programme) d'installer. Il est
possible que ce contrôle appartienne à Visual Basic





et qu'il soit disponible simplement à cause de sa présence ! Je
n'ai pas vérifié.






Salutations!

"sabatier" a écrit dans
le message de





news:%23%
bizarre, denis, chez moi, si je veux dessiner le contrôle sur la
feuille, ça





me dit "impossible d'insérer un objet"
jps
PS perso : pour mon truc, je reviendrai vers toi quand mes
neurones ne





chaufferont plus à blanc...

"michdenis" a écrit dans le message de
news:
Bonjour Super,

Voici comment faire :

Affiche la barre d'outils "Contrôle"

Tu cliques sur l'icône "Autres contrôles" de la barre d'outils
"contrôle"







et dans la liste qu'excel te proposera, tu cliques sur :

" Microsoft Mapi Message Control "

et tu dessines le contrôle (icône) sur ta feuille.

En mode création, tu double-cliques sur l'icône et tu copies ta
procédure






entre le Sub et le End Sub.


Voilà ! En plus, cela fonctionne ! ;-))


Salutations!






"Super" a écrit dans le
message de






news:
Bonjour,

J'ai vu dans le forum qu'il y avait beaucoup de littérature sur
le sujet






avec un spécialiste avéré : Papou.

Moi, je souhaiterai envoyer un fichier avec ma worksheet dans le
corps de






mon mail et non en document joint. Sur le net, j'ai beaucoup lu
sur les






contrôles MAPI, mais truc très bête, je ne connais pas la
référence à






fournir
à mon débuggeur pour qu'il reconnaisse ces objets...
J'ai tenté de lui ajouter dans les références :
C:Program FilesCommon FilesSystemMapi1033msmapi32.DLL,
mais il n'en






veut pas ("Can't add a reference to the specified file"...)

J'ai un exemple de code sous la main pris sur Excelabo, mais les
objets ne






sont donc pas reconnus et je ne sais pas ce que session
représente..







Sub mail_par_vba()

'réponse de H. S. le lundi 13 décembre 1999 13:06
'newsgroup : microsoft.public.fr.excel
'discussion : Envoi de mail à partir d'Xl

'RAJOUTER UNE REFERENCE AU CONTROLE MAPI

Dim myMessage As New MAPIMessages
Dim mySession As New MAPISession

mySession.UserName = "Hamard Stephane"
mySession.Password = ""
mySession.SignOn
myMessage.SessionID = mySession.SessionID


myMessage.Compose
myMessage.RecipAddress = ""
myMessage.MsgSubject = "Resultat " & Format(Date, "dd/mm/yy")
myMessage.MsgNoteText = "Salut Zaza"
myMessage.AttachmentType = 0
myMessage.AttachmentName = "Fichier test"
myMessage.AttachmentPathName = "c:persotemptest.txt"
myMessage.ResolveName

On Error Resume Next
'Je n'arrive pas à intercepter la fermeture de la fenêtre...
'donc j'utilise la gestion d'erreur (pas très bon).
myMessage.Send True

mySession.SignOff
End Sub


























Avatar
Misange
bonsoir Super
et si après tout ça tu fais un vrai résumé de ce qui faut faire, ça
évitera de recommencer tout ça à la prochaine question sur le sujet ;-)

Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta

on 27/10/2004 18:05:
Ah, oui je suis assez chanceux, en fait, j'ai renommé les fichiers nommée par
défaut en .txt en supprimant les extensions textes et en mettant les
extensions comme présentées sur le site, c'est à dire .dep et .srg.
POur mon cas, ça avait été transformé en .html et le nom devenait
msmapi32_srg.html par exemple, et bien, je le renomme en msmapi.srg

Après, si ça marche pas...
Il me reste à déchiffrer session et je serai bon !
Good luck

"isabelle" wrote:


Bonjour Denis, Super

Super tu as plus de chance que moi,

lorsque que j'essaie de télécharger les fichiers MSMAPI.SRG et MSMAPI32.DEP
ils sont enregistrés sous la forme MSMAPI.SRG.txt et MSMAPI32.DEP.txt

alors avec,
regsvr32.exe C:WINNTSystem32 MSMAPI32.OCX

j'obtient le message :

LoadLibrary("CWINNTSystem32") failed - Le module est introuvable

isabelle


à cette adresse, tu peux récupérer ces 3 fichiers :

http://www.dpi.ufv.br/downloads/C++%20Introductory%20Edition/VCB600ENU1/OS/SYSTEM/

MSMAPI.SRG , MSMAPI32.DEP , MSMAPI32.OCX

Tu les copies dans le Répertoire : C:WindowsSystem32

Après, tu initialises la base de registre :

Bouton de la barre des tâches "Démarrer" / commande exécuter et tu copies cette ligne de code :

regsvr32.exe c:WindowsSystem32 MSMAPI32.OCX

Le chemin doit être le même que celui où tu as copié les fichiers.

Après l'exécution de la commande, tu devrais avoir un message disant que la chose s'est bien passée.

Si cela ne fonctionne pas ....C'est que ce type de procédure requiert "Visual Basic le programme"

Il faut chercher ailleurs ce que tu veux faire !

Salutations!

"Super" a écrit dans le message de
news:
Salut Michdenis

Bon en ce qui me concerne, msmapi32.dll se trouve dans
: "C:Program FilesCommon FilesSystemMapi1033" et mon VBE refuse de
l'intégrer dans ses références.
Du coup, je ne peux malheureusement pas passeer aux étapes suivantes...
Sais tu ou je peux récupérer sinon cette dll ?

"michdenis" wrote:


Bonjour JPS, Super,

Dans VBE (visual basic editor), à partir de la barre des menus de cette fenêtre, outils / référence / si vous utilisez
le bouton parcourir pour ouvrir la référence msmapi32.dll ou msmapi32.ocx , Est-ce que la référence se charge dans la
fenêtre ? Apparaît-elle cochée ? Si oui, ouvrez l'explorateur d'objet à partir du bouton de commande de la barre
d'outils Standard de la fenêtre VBE et dans la première liste déroulante, celle affichant "Toutes les bibliothèques"
Est-ce qu'une nouvelle bibliothèque s'est ajouté au nom ressemblant à : "MSMAPI" ? Si, oui, la procédure devrait
fonctionner ! Il se peut que le contrôle issu de la barre d'outils "Contrôle" ne soit pas disponible sans "Visual


Basic"

mais si la bibliothèque est chargée, le code devrait pouvoir s'exécuter si il est chargé dans un module standard.


Sinon

pourquoi Bilou aurait pris la peine d'inclure cette bibliothèque ?


Salutations!



"jps" a écrit dans le message de news:OaCo2s$
le plus marrant, c'est que moi je l'ai bien cet ocx mais ça ne marche pas
mieux pour autant...denis doit avoir des acquaintances avec le Seigneur...
jps

"Super" a écrit dans le message de
news:

Oulalalala...
Ca m'a l'air compliqué cette affaire !!!
Bon, ben, moi non, plus, je n'ai pas ce fameux msmapi32.ocx
J'ai juste un msmapi32.dll qui ne veut pas être référencé.
Bon, ben tant pis... Si vous pensez à quelquechose sans mapi, je suis
preneur...
Merci beaucoup en tout cas.

"isabelle" wrote:


on peut le télécharger ici http://www.zerohack.it/downloads/ocx.htm,



mais comme il n'est pas correctement licencié c'est

impossible de l'utiliser. :-(

isabelle


non Denis il n'est pas présent,

isabelle


Bonjour Isabelle,

Je suis présentement sur Excel 2002 et Windows Pro Xp

'Dans Excel, la librairy ajouté au programme s'appelle Library





MSMAPI Tel que vu dans l'explorateur d'objet de la

fenêtre VBE (liste déroulante Librairy)

Le nom du fichier est : MSMAPI32.OCX

et il est situé là : C:WINDOWSSystem32

Est-il présent si le programme Visual Basic n'est pas installé ?

Salutations!

"isabelle" a écrit dans le message de





news:

salut Denis,

il n'est pas sur ma liste non plus, connais tu son nom de fichier





(x.ocx ou x.dll) ?

isabelle


Bonjour JPS,

Sur mon ordi, j'ai visual basic (le programme) d'installer. Il est






possible que ce contrôle appartienne à Visual Basic

et qu'il soit disponible simplement à cause de sa présence ! Je






n'ai pas vérifié.

Salutations!

"sabatier" a écrit dans






le message de

news:%23%
bizarre, denis, chez moi, si je veux dessiner le contrôle sur la






feuille, ça

me dit "impossible d'insérer un objet"
jps
PS perso : pour mon truc, je reviendrai vers toi quand mes






neurones ne

chaufferont plus à blanc...

"michdenis" a écrit dans le message de
news:

Bonjour Super,

Voici comment faire :

Affiche la barre d'outils "Contrôle"

Tu cliques sur l'icône "Autres contrôles" de la barre d'outils







"contrôle"

et dans la liste qu'excel te proposera, tu cliques sur :

" Microsoft Mapi Message Control "

et tu dessines le contrôle (icône) sur ta feuille.

En mode création, tu double-cliques sur l'icône et tu copies ta







procédure

entre le Sub et le End Sub.


Voilà ! En plus, cela fonctionne ! ;-))


Salutations!






"Super" a écrit dans le







message de

news:
Bonjour,

J'ai vu dans le forum qu'il y avait beaucoup de littérature sur







le sujet

avec un spécialiste avéré : Papou.

Moi, je souhaiterai envoyer un fichier avec ma worksheet dans le







corps de

mon mail et non en document joint. Sur le net, j'ai beaucoup lu







sur les

contrôles MAPI, mais truc très bête, je ne connais pas la







référence à

fournir

à mon débuggeur pour qu'il reconnaisse ces objets...
J'ai tenté de lui ajouter dans les références :
C:Program FilesCommon FilesSystemMapi1033msmapi32.DLL,







mais il n'en

veut pas ("Can't add a reference to the specified file"...)

J'ai un exemple de code sous la main pris sur Excelabo, mais les







objets ne

sont donc pas reconnus et je ne sais pas ce que session







représente..

Sub mail_par_vba()

'réponse de H. S. le lundi 13 décembre 1999 13:06
'newsgroup : microsoft.public.fr.excel
'discussion : Envoi de mail à partir d'Xl

'RAJOUTER UNE REFERENCE AU CONTROLE MAPI

Dim myMessage As New MAPIMessages
Dim mySession As New MAPISession

mySession.UserName = "Hamard Stephane"
mySession.Password = ""
mySession.SignOn
myMessage.SessionID = mySession.SessionID


myMessage.Compose
myMessage.RecipAddress = ""
myMessage.MsgSubject = "Resultat " & Format(Date, "dd/mm/yy")
myMessage.MsgNoteText = "Salut Zaza"
myMessage.AttachmentType = 0
myMessage.AttachmentName = "Fichier test"
myMessage.AttachmentPathName = "c:persotemptest.txt"
myMessage.ResolveName

On Error Resume Next
'Je n'arrive pas à intercepter la fermeture de la fenêtre...
'donc j'utilise la gestion d'erreur (pas très bon).
myMessage.Send True

mySession.SignOff
End Sub


























Avatar
isabelle
finallement j'ai obtenue un message "Successful" suite à l'exécution de regsvr32.exe C:WINNTSystem32MSMAPI32.OCX

mais à l'utilisation j'ai toujours le message "pas correctement licencié"

et là, j'aaaaaaaaaaaabandonne

isabelle


Bonjour Denis, Super

Super tu as plus de chance que moi,

lorsque que j'essaie de télécharger les fichiers MSMAPI.SRG et MSMAPI32.DEP
ils sont enregistrés sous la forme MSMAPI.SRG.txt et MSMAPI32.DEP.txt

alors avec,
regsvr32.exe C:WINNTSystem32 MSMAPI32.OCX

j'obtient le message :

LoadLibrary("CWINNTSystem32") failed - Le module est introuvable

isabelle


à cette adresse, tu peux récupérer ces 3 fichiers :

http://www.dpi.ufv.br/downloads/C++%20Introductory%20Edition/VCB600ENU1/OS/SYSTEM/

MSMAPI.SRG , MSMAPI32.DEP , MSMAPI32.OCX

Tu les copies dans le Répertoire : C:WindowsSystem32

Après, tu initialises la base de registre :

Bouton de la barre des tâches "Démarrer" / commande exécuter et tu copies cette ligne de code :

regsvr32.exe c:WindowsSystem32 MSMAPI32.OCX

Le chemin doit être le même que celui où tu as copié les fichiers.

Après l'exécution de la commande, tu devrais avoir un message disant que la chose s'est bien passée.

Si cela ne fonctionne pas ....C'est que ce type de procédure requiert "Visual Basic le programme"

Il faut chercher ailleurs ce que tu veux faire !

Salutations!

"Super" a écrit dans le message de
news:
Salut Michdenis

Bon en ce qui me concerne, msmapi32.dll se trouve dans
: "C:Program FilesCommon FilesSystemMapi1033" et mon VBE refuse de
l'intégrer dans ses références.
Du coup, je ne peux malheureusement pas passeer aux étapes suivantes...
Sais tu ou je peux récupérer sinon cette dll ?

"michdenis" wrote:

Bonjour JPS, Super,

Dans VBE (visual basic editor), à partir de la barre des menus de cette fenêtre, outils / référence / si vous utilisez
le bouton parcourir pour ouvrir la référence msmapi32.dll ou msmapi32.ocx , Est-ce que la référence se charge dans la
fenêtre ? Apparaît-elle cochée ? Si oui, ouvrez l'explorateur d'objet à partir du bouton de commande de la barre
d'outils Standard de la fenêtre VBE et dans la première liste déroulante, celle affichant "Toutes les bibliothèques"
Est-ce qu'une nouvelle bibliothèque s'est ajouté au nom ressemblant à : "MSMAPI" ? Si, oui, la procédure devrait
fonctionner ! Il se peut que le contrôle issu de la barre d'outils "Contrôle" ne soit pas disponible sans "Visual
Basic"

mais si la bibliothèque est chargée, le code devrait pouvoir s'exécuter si il est chargé dans un module standard.
Sinon

pourquoi Bilou aurait pris la peine d'inclure cette bibliothèque ?


Salutations!



"jps" a écrit dans le message de news:OaCo2s$
le plus marrant, c'est que moi je l'ai bien cet ocx mais ça ne marche pas
mieux pour autant...denis doit avoir des acquaintances avec le Seigneur...
jps

"Super" a écrit dans le message de
news:
Oulalalala...
Ca m'a l'air compliqué cette affaire !!!
Bon, ben, moi non, plus, je n'ai pas ce fameux msmapi32.ocx
J'ai juste un msmapi32.dll qui ne veut pas être référencé.
Bon, ben tant pis... Si vous pensez à quelquechose sans mapi, je suis
preneur...
Merci beaucoup en tout cas.

"isabelle" wrote:

on peut le télécharger ici http://www.zerohack.it/downloads/ocx.htm,
mais comme il n'est pas correctement licencié c'est


impossible de l'utiliser. :-(

isabelle


non Denis il n'est pas présent,

isabelle


Bonjour Isabelle,

Je suis présentement sur Excel 2002 et Windows Pro Xp

'Dans Excel, la librairy ajouté au programme s'appelle Library
MSMAPI Tel que vu dans l'explorateur d'objet de la




fenêtre VBE (liste déroulante Librairy)

Le nom du fichier est : MSMAPI32.OCX

et il est situé là : C:WINDOWSSystem32

Est-il présent si le programme Visual Basic n'est pas installé ?

Salutations!

"isabelle" a écrit dans le message de
news:




salut Denis,

il n'est pas sur ma liste non plus, connais tu son nom de fichier
(x.ocx ou x.dll) ?





isabelle


Bonjour JPS,

Sur mon ordi, j'ai visual basic (le programme) d'installer. Il est
possible que ce contrôle appartienne à Visual Basic





et qu'il soit disponible simplement à cause de sa présence ! Je
n'ai pas vérifié.






Salutations!

"sabatier" a écrit dans
le message de





news:%23%
bizarre, denis, chez moi, si je veux dessiner le contrôle sur la
feuille, ça





me dit "impossible d'insérer un objet"
jps
PS perso : pour mon truc, je reviendrai vers toi quand mes
neurones ne





chaufferont plus à blanc...

"michdenis" a écrit dans le message de
news:
Bonjour Super,

Voici comment faire :

Affiche la barre d'outils "Contrôle"

Tu cliques sur l'icône "Autres contrôles" de la barre d'outils
"contrôle"







et dans la liste qu'excel te proposera, tu cliques sur :

" Microsoft Mapi Message Control "

et tu dessines le contrôle (icône) sur ta feuille.

En mode création, tu double-cliques sur l'icône et tu copies ta
procédure






entre le Sub et le End Sub.


Voilà ! En plus, cela fonctionne ! ;-))


Salutations!






"Super" a écrit dans le
message de






news:
Bonjour,

J'ai vu dans le forum qu'il y avait beaucoup de littérature sur
le sujet






avec un spécialiste avéré : Papou.

Moi, je souhaiterai envoyer un fichier avec ma worksheet dans le
corps de






mon mail et non en document joint. Sur le net, j'ai beaucoup lu
sur les






contrôles MAPI, mais truc très bête, je ne connais pas la
référence à






fournir
à mon débuggeur pour qu'il reconnaisse ces objets...
J'ai tenté de lui ajouter dans les références :
C:Program FilesCommon FilesSystemMapi1033msmapi32.DLL,
mais il n'en






veut pas ("Can't add a reference to the specified file"...)

J'ai un exemple de code sous la main pris sur Excelabo, mais les
objets ne






sont donc pas reconnus et je ne sais pas ce que session
représente..







Sub mail_par_vba()

'réponse de H. S. le lundi 13 décembre 1999 13:06
'newsgroup : microsoft.public.fr.excel
'discussion : Envoi de mail à partir d'Xl

'RAJOUTER UNE REFERENCE AU CONTROLE MAPI

Dim myMessage As New MAPIMessages
Dim mySession As New MAPISession

mySession.UserName = "Hamard Stephane"
mySession.Password = ""
mySession.SignOn
myMessage.SessionID = mySession.SessionID


myMessage.Compose
myMessage.RecipAddress = ""
myMessage.MsgSubject = "Resultat " & Format(Date, "dd/mm/yy")
myMessage.MsgNoteText = "Salut Zaza"
myMessage.AttachmentType = 0
myMessage.AttachmentName = "Fichier test"
myMessage.AttachmentPathName = "c:persotemptest.txt"
myMessage.ResolveName

On Error Resume Next
'Je n'arrive pas à intercepter la fermeture de la fenêtre...
'donc j'utilise la gestion d'erreur (pas très bon).
myMessage.Send True

mySession.SignOff
End Sub

























Avatar
Clément Marcotte
Bonjour,

mais à l'utilisation j'ai toujours le message "pas correctement
licencié"




C'est donc un contrôle VB, et pas un contrôle VBA

1 2 3