Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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
    64.1 KB · Affichages: 32

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…