#vba #copy #pivot
Вопрос:
Я использую VBA для копирования и вставки сводной таблицы из Excel в Outlook. Одна из колонок — «Ссылки» со ссылками на определенные страницы. Я хотел бы настроить его с помощью «Нажмите здесь» и гиперссылки (вместо того, чтобы делиться длинной ссылкой. Как я могу это сделать?
Большое спасибо!
Ответ №1:
Alber!
Если вы используете HTMLBody в своем строительном Outlook, вам просто нужно добавить тег «A».
Дополнительная отправка_почтой()
Dim OutApp As Object Dim OutMail As Object Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) strHTML = "lt;a href='http://www.google.com.br'gt;Click Herelt;/agt;" With OutMail .To = "destinatario@gmail.com" .CC = "copiado@gmail.com" .BCC = "somentesenecessario@gmail.com" .HTMLBody = strHTML .Subject = "Test e-mail" .Display End With Set OutApp = Nothing Set OutMail = Nothing
Конец Суб