| Вопрос: Перенос данных из Excel на страницу в Инете | Добавлено: 04.03.07 14:37 |
Автор вопроса:  Nikola
|
|
Мне необходимо перенести часть данных из Иксель на определенную страницу в интернете.
Я нашел метод appActive,shell.Но почему-то когда эта страница открывается ничего не пересылается. Например: Public Sub Copy_info() Dim x x = Shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE" & " " _ & "http://yandex.ru/") AppActivate x, Wait Application.Wait (Now + TimeValue("0:00:05")) SendKeys "{TAB}", Wait SendKeys "E" & "X", Wait SendKeys "{TAB}", Wait SendKeys "A" & "Q", True 'SendKeys "{TAB}" 'SendKeys "{ENTER}" End Sub Так примерно я написал, инфа не пересылается |
| Ответы | Всего ответов: 0 |
Страница: