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

Вход

Регистрация

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

 

= Мир MS Excel/Настройка вложения в письма - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Настройка вложения в письма (Макросы/Sub)
Настройка вложения в письма
Oh_Nick Дата: Понедельник, 27.09.2021, 16:00 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 225
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019
Всем доброго времени суток!

Алгоритм файла следующий: На листе SendMail Выбирается отдел - Нажимается кнопка Sending emails - Формируется письмо куда вложен файл xlsx. (Лист Template).

Как мне сделать так, чтобы к определенному отделу вкладывался свой Template? Для каждого отдела я могу указать свое название Template. Например EngTemplate,HRTemplate и тд.
И нормальное ли решение ориентироваться на листы ( как вложения ) , потому что у меня 22 отдела, соответственно будет 22 листа.
К сообщению приложен файл: Budget.xlsm(324.9 Kb)


Сообщение отредактировал Oh_Nick - Понедельник, 27.09.2021, 16:05
 
Ответить
СообщениеВсем доброго времени суток!

Алгоритм файла следующий: На листе SendMail Выбирается отдел - Нажимается кнопка Sending emails - Формируется письмо куда вложен файл xlsx. (Лист Template).

Как мне сделать так, чтобы к определенному отделу вкладывался свой Template? Для каждого отдела я могу указать свое название Template. Например EngTemplate,HRTemplate и тд.
И нормальное ли решение ориентироваться на листы ( как вложения ) , потому что у меня 22 отдела, соответственно будет 22 листа.

Автор - Oh_Nick
Дата добавления - 27.09.2021 в 16:00
doober Дата: Понедельник, 27.09.2021, 18:43 | Сообщение № 2
Группа: Друзья
Ранг: Ветеран
Сообщений: 816
Репутация: 301 ±
Замечаний: 0% ±

Excel 2010
Приветствую.
Сделайте имя шаблона=названию отдела.
Так проще будет искать нужный лист.


 
Ответить
СообщениеПриветствую.
Сделайте имя шаблона=названию отдела.
Так проще будет искать нужный лист.

Автор - doober
Дата добавления - 27.09.2021 в 18:43
Oh_Nick Дата: Понедельник, 27.09.2021, 20:03 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 225
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019
doober,

Хорошо. А далее что сделать?
 
Ответить
Сообщениеdoober,

Хорошо. А далее что сделать?

Автор - Oh_Nick
Дата добавления - 27.09.2021 в 20:03
doober Дата: Вторник, 28.09.2021, 00:49 | Сообщение № 4
Группа: Друзья
Ранг: Ветеран
Сообщений: 816
Репутация: 301 ±
Замечаний: 0% ±

Excel 2010
Делаем замену в коде[vba]
Код
Sheets("Template").Select
Sheets("Template").Copy before:=Workbooks(fileName).Sheets(1)
' на этот
Sheets(CompanyName).Select
Sheets(CompanyName).Copy before:=Workbooks(fileName).Sheets(1)
[/vba]
PS: Я бы избавился от всех этих Select


 
Ответить
СообщениеДелаем замену в коде[vba]
Код
Sheets("Template").Select
Sheets("Template").Copy before:=Workbooks(fileName).Sheets(1)
' на этот
Sheets(CompanyName).Select
Sheets(CompanyName).Copy before:=Workbooks(fileName).Sheets(1)
[/vba]
PS: Я бы избавился от всех этих Select

Автор - doober
Дата добавления - 28.09.2021 в 00:49
Oh_Nick Дата: Вторник, 28.09.2021, 12:40 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 225
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019
doober,

Можете, пожалуйста, в файле прописать это.
 
Ответить
Сообщениеdoober,

Можете, пожалуйста, в файле прописать это.

Автор - Oh_Nick
Дата добавления - 28.09.2021 в 12:40
doober Дата: Среда, 29.09.2021, 10:17 | Сообщение № 6
Группа: Друзья
Ранг: Ветеран
Сообщений: 816
Репутация: 301 ±
Замечаний: 0% ±

Excel 2010
Изменил
К сообщению приложен файл: 7300328.xlsm(329.5 Kb)


 
Ответить
СообщениеИзменил

Автор - doober
Дата добавления - 29.09.2021 в 10:17
Oh_Nick Дата: Среда, 29.09.2021, 16:22 | Сообщение № 7
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 225
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019
doober, решил в итоге сослаться на папку, где лежат Template и выбирать оттуда.
 
Ответить
Сообщениеdoober, решил в итоге сослаться на папку, где лежат Template и выбирать оттуда.

Автор - Oh_Nick
Дата добавления - 29.09.2021 в 16:22
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Настройка вложения в письма (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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