Format email addresses?

S

Steve

Is there any way to format a column of email addresses, so if I click
on an address it will open up a new message in my email client?


--

The government is unresponsive to the needs of the little man.
Under 5'7" it is impossible to get your congressman on the phone.

....Woody Allen
 
R

Ron de Bruin

Hi Steve

You can run this macro for column A

Sub test()
For Each myCell In Columns("A").Cells.SpecialCells(xlCellTypeConstants)
If myCell.Value Like "?*@?*.?*" Then
ActiveSheet.Hyperlinks.Add Anchor:=myCell, _
Address:="mailto:" & myCell.Value, TextToDisplay:=myCell.Value
End If
Next
End Sub

Or insert a column with formulas

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

Steve

Or insert a column with formulas
=HYPERLINK("mailto:" & A1,A1)

Thanks Ron, that works great!


--

The government is unresponsive to the needs of the little man.
Under 5'7" it is impossible to get your congressman on the phone.

....Woody Allen
 

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