| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
converting email address formats
How do I write a macro to convert one email format to another. i.e.,
to (the first and last names are capitalized and need to be first letter of first name combined with last name, all lowercase and change the multiple email providers and extensions to "? |
|
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
converting email address formats
Try
=LOWER(LEFT(A1,1) & "), FIND(".",A1)+1,255)) If this post helps click Yes --------------- Jacob Skaria "rlpetrie12" wrote: How do I write a macro to convert one email format to another. i.e., to (the first and last names are capitalized and need to be first letter of first name combined with last name, all lowercase and change the multiple email providers and extensions to "? |
|
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
converting email address formats
"
-- David Biddulph "rlpetrie12" wrote in message ... How do I write a macro to convert one email format to another. i.e., to (the first and last names are capitalized and need to be first letter of first name combined with last name, all lowercase and change the multiple email providers and extensions to "? |
|
#4
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
converting email address formats
Select the cell and run:
Sub remailit() Set r = ActiveCell nw = "usuhs.edu" v = ActiveCell.Value s = Split(v, ".") s(0) = Left(s(0), 1) v = Join(s, ".") t = Split(v, "@") t(1) = nw r.Value = Join(t, "@") End Sub -- Gary''s Student - gsnu200909 "rlpetrie12" wrote: How do I write a macro to convert one email format to another. i.e., to (the first and last names are capitalized and need to be first letter of first name combined with last name, all lowercase and change the multiple email providers and extensions to "? |
|
#5
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
converting email address formats
=LOWER(REPLACE(LEFT(A1,FIND("@",A1)),2,FIND(".",A1 )-1,))&"usuhs.edu"
"rlpetrie12" wrote: How do I write a macro to convert one email format to another. i.e., to (the first and last names are capitalized and need to be first letter of first name combined with last name, all lowercase and change the multiple email providers and extensions to "? |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| send wkbk as an email attachment with an email address copied from | Excel Discussion (Misc queries) | |||
| how can i convert an email address to a web address | Excel Worksheet Functions | |||
| can I copy a column of email addresses, paste into email address? | New Users to Excel | |||
| Transfer Email addresses from spreadsheet to email address book | Excel Discussion (Misc queries) | |||
| Shut off email address from linking to email program? | Excel Worksheet Functions | |||
Linear Mode
