View Single Post
Old 08-25-2019, 11:21 AM
NoSparks NoSparks is offline Windows 7 64bit Office 2010 64bit
Excel Hobbyist
Join Date: Nov 2013
Location: British Columbia, Canada
Posts: 735
NoSparks will become famous soon enoughNoSparks will become famous soon enough

You can't get around the 255 character limit of the hyperlink,
but you can change your approach and use the Worksheet_Followhyperlink event to call a macro that will shell out to Thunderbird.

I put some email addresses on rows 10 to 30 and copied your existing other stuff.
Ran the AddHyperlink sub to put in the hyperlinks.
Use the Worksheet_Followhyperlink event to get the row for the info and to call the SendEmail macro.

Code to shell to Thunderbird found here:
How can I automatically send email from Thunderbird with Excel VBA? - Stack Overflow

Hyperlink to run macro found here:
Link Hyperlink to Excel Macro — Excel Dashboards VBA and more

Doc to add hyperlink using code found here:
Hyperlinks.Add method (Excel) | Microsoft Docs

Hope this helps.
Attached Files
File Type: xlsm Email_using_Thunderbird.xlsm (18.4 KB, 2 views)
Reply With Quote