Ouvrir outlook

Bonjour,
je souhaiterai simplement ouvrir l'application outlook avec un bouton macro depuis une feuille excel

Private Sub CommandButton1_Click()
'ouvrir outlook

End Sub

merci

3 réponses

  1. Contributeur
    Bonjour

    Essaie cela:

     Application.Dialogs(xlDialogSendMail).Show

    0
    1. c'est pas vraiment ca
      Ta solution ouvre bien outlook mais en créent un mail.
      mon souhait est d'ouvrir la boite de réception ou d'envoi d'outlook.
      0
      1. Contributeur
        Voilà

        Dim ID As Variant
        ID = Shell("C:\Program Files (x86)\Microsoft Office\Office12\OUTLOOK.EXE", vbMaximizedFocus) 'adapter chemin d'Outlook


        0