Converting Text To Email Addresses

A

Abradaxis

I've taken over the responsibility for a spredsheet for an organization. One
of the columns contains text which is supposedly email addresses. All the
entries are in the form (e-mail address removed) (or .net or .org, etc). when I try
to point to these, some generate open real email entries in outlook express
(which is what I want), and some don't. I've tried to highlight the
"offending" addresses and right click on them, then choosing "hyperlink," in
the menu, hoping to convert them to true email addresses. But the menu that
opens give me choices (including convert to email addresses) which don't
work, and leave me with a menu which I can't close. How can I convert all
these "apparent" email addresses to real ones which will activate Outlook
express. In some cases even retyping them in the same cell won't even
produce a real address, and this is not a desireable procedure since there
are hundreds of these addresses. Any help greatly appreciated!
 
C

Chip Pearson

You can use code to create the links:

Sub MakeLink()
Dim R As Range
For Each R In Selection.Cells
R.Hyperlinks.Delete
R.Hyperlinks.Add anchor:=R, _
Address:=R.Text, TextToDisplay:=R.Text
Next R
End Sub


Select the cells which you want to convert and then run the code.

You could also create a new column to create the hyperlinks with
formulas. Insert a new column then enter the following formula and
copy down as far as you need to go.

=HYPERLINK("mailto:"&A1,A1)

where A1 is the email address.

Cordially,
Chip Pearson
Microsoft Most Valuable Professional
Excel Product Group, 1998 - 2009
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top