B Excel вытянуть из инета документ автоматом

Программирование на Visual Basic for Applications
DOMI-NIK
Начинающий
Начинающий
 
Сообщения: 24
Зарегистрирован: 01.09.2005 (Чт) 11:51

B Excel вытянуть из инета документ автоматом

Сообщение DOMI-NIK » 01.09.2005 (Чт) 11:59

Требуется раз в 30 мин из интернета вытянуть файлик отчета и поместить его текст в Excel таблицу, где он в последующем и обработаеться.
Застрял на этом. Программировать начал недавно , базовых знаний не так много.
Подскажите как это осуществить.
Заранее спасибо.

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 01.09.2005 (Чт) 12:03

Записать макрос, посмотреть код, задать вопросы.
Lasciate ogni speranza, voi ch'entrate.

DOMI-NIK
Начинающий
Начинающий
 
Сообщения: 24
Зарегистрирован: 01.09.2005 (Чт) 11:51

Сообщение DOMI-NIK » 01.09.2005 (Чт) 12:14

Не понял ! :)

Я не могу определить с чего начать , вот в чем проблема

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 01.09.2005 (Чт) 12:42

Сделай эту операцию вручную, один раз.
Только предварительно включи запись макросов.
А потом посмотри полученный код.
Lasciate ogni speranza, voi ch'entrate.

DOMI-NIK
Начинающий
Начинающий
 
Сообщения: 24
Зарегистрирован: 01.09.2005 (Чт) 11:51

Сообщение DOMI-NIK » 01.09.2005 (Чт) 13:25

интересно получилось
кое что новое увидел

а как скопировать HTML код открытой страницы в ячейки Excel листа

Делаю макросом а он просто добавляет команду Paste и все

Димитрий
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 194
Зарегистрирован: 26.01.2005 (Ср) 22:47
Откуда: Волгоград

Сообщение Димитрий » 01.09.2005 (Чт) 18:35

Может быть это пригодится http://dimit.pochta.ru/excel/webbrowser.zip

Booozer
Начинающий
Начинающий
 
Сообщения: 18
Зарегистрирован: 30.08.2005 (Вт) 17:41
Откуда: Москва

Сообщение Booozer » 02.09.2005 (Пт) 10:35

По-моему просто необходимо в Excel создать WEB-запрос на получение необходимых данных, а затем в свойствах запроса указать время обновления.

DOMI-NIK
Начинающий
Начинающий
 
Сообщения: 24
Зарегистрирован: 01.09.2005 (Чт) 11:51

Сообщение DOMI-NIK » 13.09.2005 (Вт) 7:06

Range("A1").Select
With Selection.QueryTable
.Connection = _
"URL;http://адрес нужной страницы"
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With

и всетаки хорошая подсказка когда через макрос делаешь, а потом код просматриваешь


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 64

    TopList