Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
How to convert Email into Mailto Email Addresses
Hi All,
I am facing a problem. I have a list of around 700 email addresses, in which some are hyperlinked (mailto) and some are not. Now I wanted to know that is there any function or any way to convert all of them into Mailto Hyperlinks that when someone clicks on them links are opened into Outlook or any email application. -- Sheikh Saadi |
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
How to convert Email into Mailto Email Addresses
Hi Sheikh
You can run this macro for column B Sub test() Dim mycell As Range For Each mycell In Columns("B").Cells.SpecialCells(xlCellTypeConstant s) If mycell.Value Like "?*@?*.?*" Then ActiveSheet.Hyperlinks.Add Anchor:=mycell, _ Address:="mailto:" & mycell.Value, TextToDisplay:=mycell.Value End If Next End Sub -- Regards Ron de Bruin http://www.rondebruin.nl "Sheikh Saadi" wrote in message ... Hi All, I am facing a problem. I have a list of around 700 email addresses, in which some are hyperlinked (mailto) and some are not. Now I wanted to know that is there any function or any way to convert all of them into Mailto Hyperlinks that when someone clicks on them links are opened into Outlook or any email application. -- Sheikh Saadi |
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
How to convert Email into Mailto Email Addresses
Thnaks Ron, it works fine. Thank you for all of your help.
-- Sheikh Saadi "Ron de Bruin" wrote: Hi Sheikh You can run this macro for column B Sub test() Dim mycell As Range For Each mycell In Columns("B").Cells.SpecialCells(xlCellTypeConstant s) If mycell.Value Like "?*@?*.?*" Then ActiveSheet.Hyperlinks.Add Anchor:=mycell, _ Address:="mailto:" & mycell.Value, TextToDisplay:=mycell.Value End If Next End Sub -- Regards Ron de Bruin http://www.rondebruin.nl "Sheikh Saadi" wrote in message ... Hi All, I am facing a problem. I have a list of around 700 email addresses, in which some are hyperlinked (mailto) and some are not. Now I wanted to know that is there any function or any way to convert all of them into Mailto Hyperlinks that when someone clicks on them links are opened into Outlook or any email application. -- Sheikh Saadi |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
make XL stop interpreting email addresses as highlighted links? | Excel Discussion (Misc queries) | |||
Using CONCATENATE function to create email addresses from a list | Excel Worksheet Functions | |||
Convert entire columns of text email addresses to hyperlinks | Excel Worksheet Functions | |||
How do I format email addresses as Text only? | Excel Worksheet Functions | |||
How do you sort a column of email addresses by domain name in Exc. | Excel Discussion (Misc queries) |