Home |
Search |
Today's Posts |
#1
|
|||
|
|||
E-mail addresses in Excel 2000
I have an HR director who is copying and pasting e-mail addresses into a
spreadsheet (Excel 2000). He wants to make these addresses links. I know how to do it one at a time, but can you select 50-100 cells and have Excel make them links to the individual e-mail accounts? |
#2
|
|||
|
|||
Hi David
With the addresses in column B use this Sub test() 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 "David Williamson" wrote in message ... I have an HR director who is copying and pasting e-mail addresses into a spreadsheet (Excel 2000). He wants to make these addresses links. I know how to do it one at a time, but can you select 50-100 cells and have Excel make them links to the individual e-mail accounts? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Excel 2000 and Excel 2003 | Excel Discussion (Misc queries) | |||
VBA for Excel 2000 file is corrupt | Excel Discussion (Misc queries) | |||
how to convert GETPIVOTDATA from excel 2000 to excel 2002... | Excel Worksheet Functions | |||
other systems detecting excel 4.0 if excel 2000 is installed | Setting up and Configuration of Excel | |||
Statistical Excel Function Question within Excel 2000... | Excel Worksheet Functions |