XL 2010 Ouverture Outlook depuis VBA Excel

FG72

XLDnaute Junior
bonjour à tous,

dans le cadre de mes traitements XL, je suis amené à ouvrir Outlook pour récupérer des fichiers.
Depuis qques temps une fenêtre intempestive s'ouvre (cf pj).
mon service informatique m'indique que c'est un pb collectif et qu'il faut attendre sa résolution...

quelqu'un aurait-il le bout de code VBA Excel pour ouvrir OL et cliquer sur le bouton OK ?
j'ai essayé sans succès avec le code ci-dessous:

Sub ouvrirOL()

Dim oOutlook As Object
On Error Resume Next
Set oOutlook = GetObject(, "Outlook.Application")
On Error GoTo 0

If oOutlook Is Nothing Then
Shell "Outlook.exe", vbNormalFocus
End If

SendKeys "{ENTER}", True

End Sub

merci d'avance et bonne journée,
 

Pièces jointes

  • Fenêtre Outlook.jpg
    Fenêtre Outlook.jpg
    64.1 KB · Affichages: 18

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
302 236
Messages
2 001 687
Membres
215 256
dernier inscrit
Adso