Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Запрос в гугл док по определенным ссылкам - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, китин  
Мир MS Excel » Вопросы и решения » Excel и другие приложения » Google Docs » Запрос в гугл док по определенным ссылкам (Макросы/Sub)
Запрос в гугл док по определенным ссылкам
TimosMN15 Дата: Суббота, 02.01.2016, 22:14 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 37
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день.

Есть файл в котором с помощью макроса выполняется запрос в гугл док. Как можно сдалать так, чтобы при появлении сообщения c помощью InputBox можно было внести ссылку и запрос уже выполнялся по ней.
например, в действующем макросе запрос выполняется по ссылке: https://docs.google.com/spreads....#gid=0, после запуска макроса, появляется окно для ввода ссылки, я вставляю ссылку: https://docs.google.com/spreads....t#gid=0 и запрос выполняется уже по ней.
Файл во вложении.

Заранее спасибо
К сообщению приложен файл: __.xltm (18.0 Kb)
 
Ответить
СообщениеДобрый день.

Есть файл в котором с помощью макроса выполняется запрос в гугл док. Как можно сдалать так, чтобы при появлении сообщения c помощью InputBox можно было внести ссылку и запрос уже выполнялся по ней.
например, в действующем макросе запрос выполняется по ссылке: https://docs.google.com/spreads....#gid=0, после запуска макроса, появляется окно для ввода ссылки, я вставляю ссылку: https://docs.google.com/spreads....t#gid=0 и запрос выполняется уже по ней.
Файл во вложении.

Заранее спасибо

Автор - TimosMN15
Дата добавления - 02.01.2016 в 22:14
Udik Дата: Воскресенье, 03.01.2016, 13:23 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1588
Репутация: 192 ±
Замечаний: 0% ±

Excel 2016 х 64
Добавил пару строк и одну изменил
[vba]
Код

Dim strAdress As String
Const prompt As String = "Type http"
Const title As String = "Input http"
Const defAdress As String = "https://docs.google.com/spreadsheets/d/1DzfiByeb_kJkqAaedOYIC1uRM-Sgx2s1Y70yDcPLYtQ/edit?pref=2&pli=1"

strAdress = InputBox(prompt, title, defAdress)
    With ActiveSheet.QueryTables.Add(Connection:="URL;" & strAdress, Destination:=Range("$A$1"))
[/vba]
К сообщению приложен файл: 5889350.xltm (20.2 Kb)


вот вам барабан
яд 41001231307558 wm R419131876897
udik1968@gmail.com
 
Ответить
СообщениеДобавил пару строк и одну изменил
[vba]
Код

Dim strAdress As String
Const prompt As String = "Type http"
Const title As String = "Input http"
Const defAdress As String = "https://docs.google.com/spreadsheets/d/1DzfiByeb_kJkqAaedOYIC1uRM-Sgx2s1Y70yDcPLYtQ/edit?pref=2&pli=1"

strAdress = InputBox(prompt, title, defAdress)
    With ActiveSheet.QueryTables.Add(Connection:="URL;" & strAdress, Destination:=Range("$A$1"))
[/vba]

Автор - Udik
Дата добавления - 03.01.2016 в 13:23
TimosMN15 Дата: Воскресенье, 03.01.2016, 16:49 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 37
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Огромное спасибо.
 
Ответить
СообщениеОгромное спасибо.

Автор - TimosMN15
Дата добавления - 03.01.2016 в 16:49
Мир MS Excel » Вопросы и решения » Excel и другие приложения » Google Docs » Запрос в гугл док по определенным ссылкам (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!