Копирование таблицы в Excel с помощью VBA

Question

В основном я использовал некоторые примеры кода я получил от здесь: http://dailydoseofexcel.com/archives/2011/03/08/get-data-from-website-that-requires-a-login/

Но это довольно старый и сайт я пытаюсь получить таблицу из есть под:

<table class="list"> 

Вместо пути таблица создана на примере веб-сайт, я хочу, чтобы скопировать всю таблицу в

<table class="list"> 

есть ли способ изменить что код, поскольку мне все равно нужно войти в систему, как только войти в таблицу будет вискось.

Спасибо за помощь, надеюсь, это легко.

Answer 1

Сайт пример находит таблицу:

Set ieTable = ieDoc.all.Item("sampletable") 

В сущности это manipulaing в DOM (Document Object Model) страницы HTML. Вам нужно изменить это, чтобы получить таблицу.

Если имеется только одна таблица на вашем сайте, то, возможно, следующий будет работать:

Set ieTable = ieDoc.all.getElementsByTagName("TABLE") 

или:

Set ieTable = ieDoc.body.all.getElementsByTagName("TABLE") 

getElementsByTagName() является метод DOM, чтобы получить элемент из веб-страницы с помощью его имя тега. Название тега «TABLE». Поскольку этот метод возвращает коллекцию, он все еще может быть необходимо, чтобы получить элемент из коллекции, которые вы можете сделать:

Set ieTable = ieDoc.all.getElementsByTagName("TABLE")[0] 

получить первый элемент.

Дополнительную информацию см. В документации DOM (только для Google для документации DOM).