| Вопрос: Excel запрос WEB | Добавлено: 16.04.08 00:01 |
Автор вопроса:  Василий
|
|
В ячеке А5 формируется URL для WEB запроса хотелось автоматизировать вставку адреса. Но в строке ".Connection = links" возникает ошибка!!! ЧТО НЕ ТАК?
Подскажите пжлст.) Sub QueryWeb()
' ' QueryWeb Ìàêðîñ ' Ìàêðîñ çàïèñàí 15.04.2008 (KVV) ' ' On Error Resume Next Dim links As String links = Range("A5") Sheets("MOSIBOR1M").Select With Selection.QueryTable .Connection = links .WebSelectionType = xlSpecifiedTables .WebFormatting = xlWebFormattingNone .WebTables = "20" .WebPreFormattedTextToColumns = True .WebConsecutiveDelimitersAsOne = True .WebSingleBlockTextImport = False .WebDisableDateRecognition = False .WebDisableRedirections = False .Refresh BackgroundQuery:=False End With End Sub |
| Ответы | Всего ответов: 1 |
|
Номер ответа: 1 Автор ответа:  Василий Вопросов: 8 Ответов: 27 |
Профиль | | #1 | Добавлено: 16.04.08 01:22 |
|
Тема закрыта сам разобрался в строке запроса забыл в начале поставить URL;
Блин. Внимательней надо быть. ))))) |
||
Страница: 1 |