Avant de plonger dans la programmation d’Outlook à partir d’Excel, il convient de noter qu’Outlook est différent d’Excel, Word, Access et PowerPoint sur un point clé. Contrairement à ces autres applications Office pour lesquelles vous pouvez créer plusieurs instances dans votre travail, Outlook n’est pas le type d’application pour cela. Lorsqu’il s’agit de gérer les e-mails, les tâches et les calendriers, il est logique de n’avoir qu’une seule instance d’Outlook ouverte à la fois.

La macro suivante vérifie d’abord si Outlook est déjà ouvert et, si tel est le cas, autorise la poursuite de votre macro. Si Outlook est fermé, la macro se termine, avec une boîte de message vous alertant pour ouvrir Outlook afin de continuer:

Sub OuvrirOutlook()

Dim objetOutlook As Object

On Error Resume Next

Set objetOutlook = GetObject(, "Outlook.Application")

If objetOutlook Is Nothing Then

Err.Clear

MsgBox " Impossible de continuer, Outlook n'est pas ouvert.", , _

" Veuillez ouvrir Outlook et réessayer."

Exit Sub

Else

MsgBox " Le reste de votre code va ici.", , "Outlook est ouvert!"

End If

End Sub

REMARQUE

Vous avez peut-être remarqué que ma macro OuvrirOutlook ne suit pas le même processus d’ouverture d’Outlook si elle n’est pas déjà ouverte, comme j’ai montré comment faire pour Word et PowerPoint. La raison en est qu’Outlook est un animal différent des autres applications Office en ce qui concerne la façon dont il s’ouvre à l’aide de la liaison tardive. Le code de programmation avec une liaison tardive pour ouvrir Outlook, sans qu’il soit déjà ouvert, implique des méthodes VBA au-delà de la portée de cette leçon d’introduction. C’est correct, car dans la pratique quotidienne, il n’est pas rare d’afficher des messages conviviaux, comme le fait la macro OuvrirOutlook, pour demander qu’une simple étape manuelle soit effectuée avant de continuer.