フォームのsubmitじゃなくて、画のボタンをクリックする

IMGタグ探してsrcが一定条件のもの見つけてClick

    Dim objImage
    For Each objImage In objIE.Document.getElementsByTagName("IMG")
        If InStr(objImage.src, "/pc/images/gm_home.gif") > 0 Then
            objImage.Click
            Exit For
        End If
    Next