Ссылаясь на элемент HTML

Question

Не могли бы вы сказать мне, что не так с этим кодом:

Public Sub GetInfo()
    Dim IE As Object, html As Object

    With CreateObject("InternetExplorer.Application")
        .Visible = True
        .navigate "https://pl.pons.com/tłumaczenie"

        While .Busy Or .readyState < 4: DoEvents: Wend

        Set html = CreateObject("htmlfile")
        Set html = .document

        With html

            .getElementsByTagName("span")(22).Click
            .getElementsByTagName("span")(109).Click
            .getElementByID("q").Value = "rower"
            .querySelector("button.btn.btn-primary.submit").Click
            Application.Wait Now + TimeSerial(0, 0, 3)
            translation = .getElementsByTagName("dd")(0).innerText

            Stop
        End With
        .Quit
    End With

End Sub

Это работает, но перевод ничего не возвращает.Я использую позднюю привязку и не могу ее изменить.