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

Вход

Регистрация

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

 

= Мир MS Excel/Скачивание файлов в папку по каждой гиперссылке из Экслель - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Скачивание файлов в папку по каждой гиперссылке из Экслель (Макросы/Sub)
Скачивание файлов в папку по каждой гиперссылке из Экслель
yaroslav-dudarev-sergeevi Дата: Четверг, 29.07.2021, 23:43 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация: 0 ±
Замечаний: 0% ±

2019
Всем привет!

Для структурирования данных мне нужно сделать таблицу с общим списком документов, в которой будут гиперссылки на эти документы. А также я хочу сделать кнопку "скачать", чтобы люди могли скачать документ к себе на компьютер, не открывая его. Каждая ячейка имеет гиперссылку сделанная через формулу на каждый файл по отдельности, файлов очень много и на каждую делать кнопку «скачать» не вариант, есть ли такая возможность, чтобы макрос или функция брал гиперссылку из ячейки, но при этом эта кнопка действовала по отдельности на каждую ячейку (то есть макрос или функция (либо все вместе) скачивал один файл по отдельности).

Образец Эксель и папку с структурой прилагаю, но только по ссылке. Типовой макрос на кнопку скачивание прилагаю (но это только на ссылку указанный в самом макросе) на 10 000 файлов добавлять макрос с нарастающим количеством замучаюсь, да и возможно Эксель уже не потянет. Также к примеру есть функция на проверку наличия файла по гиперссылке, может из нее что-то получится вытащить и объединить макрос с функцией на скачивание.

https://disk.yandex.ru/d/3VI7zEGumeHakg

Возможно ли это? И если да, то как это сделать?

Заранее огромное спасибо за помощь!
 
Ответить
СообщениеВсем привет!

Для структурирования данных мне нужно сделать таблицу с общим списком документов, в которой будут гиперссылки на эти документы. А также я хочу сделать кнопку "скачать", чтобы люди могли скачать документ к себе на компьютер, не открывая его. Каждая ячейка имеет гиперссылку сделанная через формулу на каждый файл по отдельности, файлов очень много и на каждую делать кнопку «скачать» не вариант, есть ли такая возможность, чтобы макрос или функция брал гиперссылку из ячейки, но при этом эта кнопка действовала по отдельности на каждую ячейку (то есть макрос или функция (либо все вместе) скачивал один файл по отдельности).

Образец Эксель и папку с структурой прилагаю, но только по ссылке. Типовой макрос на кнопку скачивание прилагаю (но это только на ссылку указанный в самом макросе) на 10 000 файлов добавлять макрос с нарастающим количеством замучаюсь, да и возможно Эксель уже не потянет. Также к примеру есть функция на проверку наличия файла по гиперссылке, может из нее что-то получится вытащить и объединить макрос с функцией на скачивание.

https://disk.yandex.ru/d/3VI7zEGumeHakg

Возможно ли это? И если да, то как это сделать?

Заранее огромное спасибо за помощь!

Автор - yaroslav-dudarev-sergeevi
Дата добавления - 29.07.2021 в 23:43
Pelena Дата: Пятница, 30.07.2021, 08:42 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 17889
Репутация: 3982 ±
Замечаний: ±

Excel 2016 & Mac Excel
Здравствуйте.
Вариант выгрузки по двойному клику. Файл должен располагаться так же как в приложенном архиве
К сообщению приложен файл: 8835425.xlsm(39.7 Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеЗдравствуйте.
Вариант выгрузки по двойному клику. Файл должен располагаться так же как в приложенном архиве

Автор - Pelena
Дата добавления - 30.07.2021 в 08:42
Erjoma1981 Дата: Пятница, 30.07.2021, 09:52 | Сообщение № 3
Группа: Проверенные
Ранг: Участник
Сообщений: 53
Репутация: 20 ±
Замечаний: 0% ±

Excel 2010, 2019
Ячейку в которой расположен левый верхний угол нажатой кнопки можно определить следующим образом

[vba]
Код
Dim ВЭтойЯчейкеНажатаКнопка As Range

    Set ВЭтойЯчейкеНажатаКнопка = ActiveSheet.Buttons(Application.Caller).TopLeftCell
[/vba]


Сообщение отредактировал Erjoma1981 - Пятница, 30.07.2021, 09:54
 
Ответить
СообщениеЯчейку в которой расположен левый верхний угол нажатой кнопки можно определить следующим образом

[vba]
Код
Dim ВЭтойЯчейкеНажатаКнопка As Range

    Set ВЭтойЯчейкеНажатаКнопка = ActiveSheet.Buttons(Application.Caller).TopLeftCell
[/vba]

Автор - Erjoma1981
Дата добавления - 30.07.2021 в 09:52
yaroslav-dudarev-sergeevi Дата: Понедельник, 02.08.2021, 00:23 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 2
Репутация: 0 ±
Замечаний: 0% ±

2019
Pelena, оказывается всего-то надо было сделать. Огромнейшее Вам спасибо, очень выручили!!!
 
Ответить
СообщениеPelena, оказывается всего-то надо было сделать. Огромнейшее Вам спасибо, очень выручили!!!

Автор - yaroslav-dudarev-sergeevi
Дата добавления - 02.08.2021 в 00:23
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Скачивание файлов в папку по каждой гиперссылке из Экслель (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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