Как установить флажок в Интернете с помощью Excel VBA?

Question

Как установить флажок в таблице?

Я пытался щелкнуть.

ie.Document.getElementsByClassName("x-grid3-hd-checker").Checked = True

<div class="x-grid3-hd-inner x-grid3-hd-checker x-grid3-hd-checker-on" unselectable="on" style="">
    <a class="x-grid3-hd-btn" href="#"></a>
    <div class="x-grid3-hd-checker">&nbsp;</div>
    <img class="x-grid3-sort-icon" src="/javascript/extjs/resources/images/default/s.gif">
</div>

Answer 1

Я не вижу флажок в коде HTML. Но вы используете getElementsByClassName () неправильно для вашего случая. getElement s ByClassName () создает коллекцию узлов. Если вам нужен определенный c узел, вы должны получить его по индексу в коллекции узлов. Первый элемент имеет индекс 0.

Обратите внимание, что тег div с CSS class class = "x-grid3-hd-inner x-grid3-hd-checker x-grid3-hd- checker-on " также включен в коллекцию узлов, поскольку часть идентификатора класса идентична " x-grid3-hd-checker ". [Редактировать: я не совсем уверен, должна ли деталь стоять в начале идентификатора]

Если вы хотите проверить это:

<div class="x-grid3-hd-checker">&nbsp;</div>

Ваш код нуждается во втором индексе из коллекции узлов:

ie.Document.getElementsByClassName("x-grid3-hd-checker")(1).Checked = True

Но если есть еще теги с именем класса "x-grid3-hd-checker" , приведенная выше строка не работает. Я не могу больше говорить, пока вы не отправите больше HTML и код VBA. Лучше всего будет ссылка на сайт.