Как кликнуть по кнопке на сайте?

[minitulen]

Есть код на VBA Exel 2010

Set ie = CreateObject("InternetExplorer.Appl ication")
ie.Visible = True
ie.Navigate ("http://www.********")
Do Until ie.readyState = 4 'For STATE as COMPLETE
DoEvents
Loop
ie.Document.getelementbyID("VoteBut ton").Click

так вот по этой кнопке не кликает, кнопка со скриптом и выглядит вот так

<div id="VoteButton" class="VButton">
<a href="javascript:void(0)" onclick="vote();">Vote</a>
</div>

по обычным кнопкам на сайте кликает
обычная страница без Iframe
Помогите, как нажать эту кнопку или как запустить этот скрипт?

[doober]

Поделитесь ссылкой,толка будет больше.
Как вариант

          ie.Document.getelementbyID("VoteButton").All(0).RaiseEvent("onclick")

начиная с IE9 этот вариант не пройдет

[minitulen]

http://offerpop.com/FacebookContestE...959597&rest2=0

вариант ie.Document.getelementbyID("VoteBut ton").All(0).RaiseEvent("onclick") не работает. Выдает Object doesn't support this property or method (Error 438)

[minitulen]

В том то и дело, у меня ie9? Так что из за одной кнопки ставить ie8 ?

[nerv]

в консоли браузера наберите

vote();

[minitulen]

Спасибо! Работает!
Но, я консоль вызвал по F12, а вот как в тексте программы забить это в консоль и выполнить?

[Watcher_1]

Вот ловите у меня отработало все на ура
У меня правда IE 8

Sub m()
    Set ie = CreateObject("InternetExplorer.Application")
    ie.Visible = True
    ie.Navigate ("http://offerpop.com/FacebookContestEntry.psp?c=275661&u=45535&a=254553244581393&p=20005774861&rest=0&id=959597&rest2=0")
    Do Until ie.readyState = 4 'For STATE as COMPLETE
      DoEvents
    Loop
    Set a = ie.Document.GetElementsByTagName("A")
    For i = 0 To a.Length - 2
      If InStr(1, a(i).outerHTML, "Vote") > 0 Then
        a(i).Click
      End If
    Next i

End Sub

[minitulen]

Watcher_1 ! Низкий поклон! Спасибо огромное! Все работает.
А то я уже начал через winip курсор мыши на нее двигать и кликать -)))
И еще вопрос, а если на странице есть iframe и я знаю и name и id как добраться до кнопки именно в iframe Ваш вариант находит все кнопки на странице, а вот на iframe не видит.

[Watcher_1]

А если попробовать ie.Document.all.GetElementsByTagNam e("A") ?

[minitulen]

ie.Document.all.GetElementsByTagNam e("A")
не пашет -((
Object doesn't support this property or method (Error 438)