VBA - Comment dire "click bouton "Ecrire" dans Yahoo! Mail"?

Bonsoir à tous,

J'ai un bout de code qui me permet de lancer Internet explorer et d'aller ensuite sur Yahoo! Mail...

Le code me permet aussi d'entrer mon "Login", mon "Password" et de cliquer sur le bouton "Connection"...

Le code n’emmène ensuite sur la page de mes Mails et c'est là ou je bloque !!!

Je voudrais arriver a cliquer sur le bouton "Ecrire" (Nouveau mail) pour afficher sa fenêtre afin de rédiger le corps du mail via VBA...

Le code:

Declare Function apiShowWindow Lib "user32" Alias "ShowWindow" _
            (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

Global Const SW_MAXIMIZE = 3
Global Const SW_SHOWMINIMIZED = 2
Global Const SW_SHOWNORMAL = 1

Sub Ouvrir_Yahoo_Mail()

    Dim IE
    Dim IEdoc As Object
    Dim DOCelement As Object
    Const READYSTATE_COMPLETE = 4

    Set IE = CreateObject("InternetExplorer.application")
    IE.Visible = True
    apiShowWindow IE.hwnd, SW_MAXIMIZE
    IE.Navigate ("https://login.yahoo.com")

     ' attente de fin de chargement
   Do Until IE.readyState = 4
        DoEvents
    Loop

    Set IEdoc = IE.Document

    'login
    Set DOCelement = IEdoc.GetElementsByName("username").Item
     DOCelement.Value = "xxxxxxx.xxxxxxxxx@yahoo.fr" '<-- Ton login ici

    'password
    Set DOCelement = IEdoc.GetElementsByName("passwd").Item
     DOCelement.Value = "xxxxxx" '<-- Ton mot de passe ici
    DOCelement.Select

    'connexion
    Set DOCelement = IEdoc.Forms(0)
     DOCelement.Submit

     IE.Navigate ("https://mg.mail.yahoo.com/neo/launch?.rand=xxxxxxxxx") '<-- Se connecter, puis rentrer içi l'adresse de la page de ses mails

   Set ObjectIE = IE.Document.getElementByClassName("btn btn-compose") 'on selectionne le bouton "Ecrire"
    ObjectIE.Click 'on clique sur ce bouton

 End Sub

Et là, le code HTML du bouton "Ecrire" sur la page Yahoo!:

<button tabindex="0" title="Écrire" class="btn btn-compose" id="yui_3_16_0_ym19_1_1481501931669_1532" data-action="compose"> <i></i><span class="icon-text">Écrire</span> </button>

Si quelqu'un pouvait me débloquer, se serait vraiment sympas...

Personne pour m'aider ???

Personne pour m'aider ???

Rechercher des sujets similaires à "vba comment dire click bouton ecrire yahoo mail"