form_timer olayına aşağıdaki satırı ekleyerek dener misiniz?
WebBrowser9.Object.Document.body.Style.overflow = "hidden" '<==eklenen satır

Private Sub Form_Timer()

    If WebBrowser9.Object.ReadyState = 4 Then

        TimerInterval = 0

        WebBrowser9.Object.Document.parentwindow.Scroll 0, 400

        WebBrowser9.Object.Document.body.Style.overflow = "hidden" '<==eklenen satır

        'WebBrowser9.Object.Document.Body.Scroll = "No"

        'WebBrowser9.Object.Document.parentwindow.Scroll = "No"

        'WebBrowser9.Object.Document.body.setattribute "scroll", "no"



    End If

End Sub

---

Konuyu yine yanlış yere açmışsınız galiba)