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

Вход

Регистрация

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

 

= Мир MS Excel/Отправка письма со ссылкой на файл или папку. - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Отправка письма со ссылкой на файл или папку. (Макросы/Sub)
Отправка письма со ссылкой на файл или папку.
Toha Дата: Четверг, 15.08.2019, 14:37 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Добрый день! Помогите с кодом VBA для отправки ссылки (гиперссылки) на файл или папку находящийся по адресу
к примеру C:\Users\Desktop\EXCEL.
 
Ответить
СообщениеДобрый день! Помогите с кодом VBA для отправки ссылки (гиперссылки) на файл или папку находящийся по адресу
к примеру C:\Users\Desktop\EXCEL.

Автор - Toha
Дата добавления - 15.08.2019 в 14:37
boa Дата: Четверг, 15.08.2019, 17:59 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 407
Репутация: 115 ±
Замечаний: 0% ±

2013, 365
Toha, здравствуйте
не совсем понятен вопрос
но может вам нужна функция Environ

[vba]
Код
env$ = Environ("USERPROFILE") & "\Desktop\EXCEL\"
[/vba]


 
Ответить
СообщениеToha, здравствуйте
не совсем понятен вопрос
но может вам нужна функция Environ

[vba]
Код
env$ = Environ("USERPROFILE") & "\Desktop\EXCEL\"
[/vba]

Автор - boa
Дата добавления - 15.08.2019 в 17:59
Toha Дата: Пятница, 16.08.2019, 14:36 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
boa,
Добрый день! Попробую описать просьбу более подробно.
На локальном сервере находится папка с таблицей EXCEL для общего пользования определенным группам лиц.
После заполнения необходимыми данными таблицу я делаю рассылку адресатам. Рассылка выполняется из самой
таблицы по нажатию соответствующей кнопки с привязанным к ней кодом VBA. Происходит отправка письма группам лиц и таблицы как вложение в письмо Outlook.
Хотелось бы не отправлять каждый раз таблицу как вложенный файл, а отправлять только путь к данному файлу в виде гиперссылки.
Что бы при получении письма получатель нажав гиперссылку перешел в данную таблицу.
В просторах инета много примеров но в основном все направлены на отправку ссылки в виде http:
Во вложении файл как я сейчас делаю.

Нашел код как бы то что нужно но он не работает.... файл "КОД" во вложении.
Спасибо!
К сообщению приложен файл: 7912504.xlsm(16.8 Kb) · 7562673.xlsm(12.0 Kb)
 
Ответить
Сообщениеboa,
Добрый день! Попробую описать просьбу более подробно.
На локальном сервере находится папка с таблицей EXCEL для общего пользования определенным группам лиц.
После заполнения необходимыми данными таблицу я делаю рассылку адресатам. Рассылка выполняется из самой
таблицы по нажатию соответствующей кнопки с привязанным к ней кодом VBA. Происходит отправка письма группам лиц и таблицы как вложение в письмо Outlook.
Хотелось бы не отправлять каждый раз таблицу как вложенный файл, а отправлять только путь к данному файлу в виде гиперссылки.
Что бы при получении письма получатель нажав гиперссылку перешел в данную таблицу.
В просторах инета много примеров но в основном все направлены на отправку ссылки в виде http:
Во вложении файл как я сейчас делаю.

Нашел код как бы то что нужно но он не работает.... файл "КОД" во вложении.
Спасибо!

Автор - Toha
Дата добавления - 16.08.2019 в 14:36
boa Дата: Пятница, 16.08.2019, 15:57 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 407
Репутация: 115 ±
Замечаний: 0% ±

2013, 365
Toha, здравствуйте,
в данном случае, написание ссылки должно соответствовать правилам HTML
[vba]
Код
...
    .HTMLBody = _
    "<p>Ежемесячный отчет готов. Нажмите на ссылку, чтобы получить его.</p>" & _
    "<p><a href=Z:\Downloads\Ежемесячный Отчет.xlsx>Download Now</a></p>"
'или
'    "<p><a href=" & Thisworkbook.FullName & ">Download Now</a></p>"
...
[/vba]




Сообщение отредактировал boa - Пятница, 16.08.2019, 15:58
 
Ответить
СообщениеToha, здравствуйте,
в данном случае, написание ссылки должно соответствовать правилам HTML
[vba]
Код
...
    .HTMLBody = _
    "<p>Ежемесячный отчет готов. Нажмите на ссылку, чтобы получить его.</p>" & _
    "<p><a href=Z:\Downloads\Ежемесячный Отчет.xlsx>Download Now</a></p>"
'или
'    "<p><a href=" & Thisworkbook.FullName & ">Download Now</a></p>"
...
[/vba]

Автор - boa
Дата добавления - 16.08.2019 в 15:57
Toha Дата: Понедельник, 26.08.2019, 08:12 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 3
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
boa, добрый день!
Огромное спасибо за помощь, все получилось как и хотелось.
 
Ответить
Сообщениеboa, добрый день!
Огромное спасибо за помощь, все получилось как и хотелось.

Автор - Toha
Дата добавления - 26.08.2019 в 08:12
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Отправка письма со ссылкой на файл или папку. (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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