batch converting a list of email addresses to 'mailto:' hyperlink

  • Thread starter Thread starter Chuck
  • Start date Start date
C

Chuck

I would like to know if it is possible to batch convert a
columnar list of email addresses to 'mailto:' hyperlink.
I can do it 'one at a time', but it will take forever..
pls anyone help? send to email address, thanks..
 
Chuck:

Select the range of data you want to convert and run the
following macro:
Sub Mailto_hyperlink()
Dim i As Integer
Dim myRange As Range

Set myRange = Selection

With myRange
For i = 1 To .Rows.Count
ActiveSheet.Hyperlinks.Add Anchor:=Selection,
Address:="mailto:" & ActiveCell.Value
ActiveCell.Offset(1, 0).Range("A1").Select
Next i
End With
End Sub

Regards,
Felipe
 
How about a helper column with a formula:

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

And drag down.
 
Back
Top