Discussion :

[vincent team]

Bonjour à tous,

Mes envois d'emails en automatique (via VBA en excel) fonctionnaient très bien jusqu'à ce que l'on me réinstalle Outlook suite à un plantage.
Cela fonctionne toujours mais je dois laisser outlook ouvert sur ma machine.
Si Outlook est fermé l'exécution du code se plante et j'ai le message d'erreur suivant :
<Enterprise Vault Outlook Add-In could not establish a connection to your exchange mailbox. Restart Outlook and, if the same error occurs repeatidly, call your helpdesk>

Est ce que quelqu'un aurait une idée pour résoudre ce problème ?

PS: La solution de laisser Outlook ouvert ne convient pas et celle d'appeler le Helpdesk n'est pas bonne non plus

Merci
Vincent

[QuestVba]

Bonsoir,

Je ne connais pas cette erreur. Il y aurait d'autres infos dans le pop-up ?

As-tu vu ceci :

https://www.veritas.com/support/en_US/article.TECH35774

[vincent team]

Bonjour @QuestVba,

Oui j'ai vu ce lien déjà mais cela ne m'aide pas.
Si à partir d'un autre PC je me connecte avec mon user, l'envoi fonctionne avec Outlook fermé (en utilisant le même fichier excel).
Le problème est sur mon PC.

Voici un peu plus de details dans les messages d'erreur rencontrés

Merci
Vincent

[QuestVba]

Bonjour,

Je cherche toujours (trouver c'est mieux ).

Sinon ... Pourquoi ne pas passer par l'objet CDO ? (Plus de problème outlook)

[Oliv-]

salut,
après ton "set ol = new outlook.application"

essaye en utilisant la méthode LOGON voir

Visual Basic pour Applications

Code :

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

1
2
3
4
5
6
Sub StartOutlook()
    Dim myNameSpace As Outlook.NameSpace
 
    Set myNameSpace = Application.GetNamespace("MAPI")
    myNameSpace.Logon "LatestProfile", , True, True
End Sub

[vincent team]

Salut Oliv,

Merci, nickel ! J'ai ajouté l'instruction Application.MailLogon et cela refonctionne de nouveau

Code :

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

1
2
3
Application.MailLogon
Set ol = New Outlook.Application
Set olmail = ol.CreateItem(olMailItem)

@ QuestVba, je ne connais pas l'objet CDO, mais heureusement tout est rentré dans l'ordre


Merci à vous deux
Vincent