Discussion :

[ManinBI]

Bonjour,

J'ai besoin de vous SVP. Je vous explique. J'utilise BO 6.5 avec une licence REPORTER. J'essaie d'automatiser le plus possible notre reporting. Jusqu'ici tout se passe bien concernant l'ouverture, le refresh et la sauvegarde de plusieurs rapports dans des repertoires différents. Tout ceci via VBA. Mais j'essaie d'aller plus loin.

Sans le BCA (BroadCast Agent), sans pouvoir installer MAPI (application de messaging) ou une autre application de messaging, j'aimerais savoir si grâce à OUTLOOK (seulement installé), je pourrai envoyer par mail à des utilisateurs, directement grâce à mon code VBA dans BO, les rapports déjà "refresh"és.

Si OUI, si vous l'avez déjà essayé, pourriez-vous m'aider?
Si NON, y a-t'il une autre possibilté?

Je vous remercie d'avance de votre attention.

[TomDuBouchon]

Bonjour,

Oui c'est tout à fait possible.

Via le code VBA, il faut déjà rafraichir le rapport puis l'exporter (en Excel, en PDF, etc...)

Cela fait, il faudra faire appel aux méthodes liées à Outlook, en ayant préalablement déclaré une application Outlook dans l'en-tête du code (la library correspondante sera sans doute à cocher dans le menu Références)

[ManinBI]

Bonjour.

Merci pour la réponse. j'avais finalement trouvé une solution. Effectivement, via Outlook. Voici une parti du code qui pourra aider.
-------------------------------------

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
'Début du mailing via Microsoft Outlook
Set OLAP = CreateObject("Outlook.Application")
Set Message = OLAP.CreateItem(olMailItem)
Message.To = "adresse mail"
Message.CC = "Adresse mail"
Message.BCC = "adresse mail"
Message.Subject = "Sujet du mail"
Message.HTMLBody = "Texte"
Message.Attachments.Add Source:="Chemin et nom du fichier"
Message.Send
'Fin de la procédure de mailing.

-----------------------------------