[fr-users] Envoi mail par macro sous calc

Bonjour 

Voici une nouvelle question envoyée à l'aide du formulaire de demande d'aide 
(http://fr.libreoffice.org/get-help/poser-une-question/).
Si vous répondez, merci de penser à utiliser la fonction "répondre à tous" de votre logiciel de 
courrier électronique de façon que le demandeur reçoive une copie de votre réponse.


Email:: raymond.tindel@sfr.fr 
Sujet:: Envoi mail par macro sous calc 
OS:: Windows 10 
Version:: 6.1.x 
Question:: Bonjour à toutes et à tous,
Je désire envoyer un mail par macro
J( utilise la dernière version de Thunderbird sous windows 10
ma macro est la suivante :Sub Main
dim Sv as object, UnClient as object, MonMel as object
dim encopie(1) as string, annexes(1) as string
Sv = createUnoService("com.sun.star.system.SimpleSystemMail")
UnClient = Sv.querySimpleMailClient
if IsBull(UnClient) then
msgbox("Clent de messagerie non disponoble",16)
with monmel
 .Recipient = "r.tindel@free.fr"  
  end with
endif
j'' obtiens le message :
Erreur d' exécution du Basic
Variable d' objet non définie
Thunderbird est bien déclaré comme programme par défaiut messagerie
Y a t' il un paramétrage autre à réaliser ?
Merci de votre aide
 


-- 
Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour vous désinscrire
Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/
Privacy Policy: https://www.documentfoundation.org/privacy