How do I make email addresses in a column of cells active links?

[Jerimoth]

I have a column of email addresses, but they are static. How do I turn them
into active cells that when clicked take me to a new email message in Outlook?

 

[Roger Govier]

Hi

Mark the range of cells with the email addresses.
Edit>Paste as Hyperlink

 

[Gary''s Student]

Try this macro:

Sub email()
Dim r As Range
For Each r In Selection
ActiveSheet.Hyperlinks.Add Anchor:=r, _
Address:="mailto:" & r.Value, TextToDisplay:=r.Value
Next
End Sub

Just select the cells you want to convert and run the macro.

 

[Dave Peterson]

How about using another column:

=hyperlink("mailto:" & a1,a1)

and drag down.