PB lancement d'outlook par VBA d'escel

Fermé
RV53 - 5 sept. 2009 à 22:59
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 6 sept. 2009 à 14:41
Bonjour,
Depuis Excel, je cherche à envoyer un email Outlook via du code VBA.

Mon code fonctionne correctement lorsque Outlook est ouvert. Lorsque Outlook
n'est pas ouvert j'ai un message d'erreur sur la ligne

Set OLMail = OLApp.CreateItem(0)

Le message d'erreur est le suivant : "Echec de l'opération".
J'ai bien activé la reference Microsoft Outlook 10.0 Object Library
Peut-on faire ouvrii outlook avant ??????
Merci
RV53
A voir également:

2 réponses

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
6 sept. 2009 à 14:41
Bonjour

ce bout de code ouvre OUTLOOK si ce dernier est fermé
Set OLk_appli = GetObject( "Outlook.Application")
If OLk_Appli Is Nothing Then
OLk_OK= Shell("C:\Program Files\Microsoft Office\Office10\OUTLOOK.EXE", 1)
end if

office10 à adapter à ta version d'Office
3
Utilisateur anonyme
6 sept. 2009 à 13:32
Je dirais pourquoi faire simple quand on peut faire compliqué.
Le plus simple ouvrir Excel et insertion fichier excel cela me semble beaucoup plus simple.
0