Excel Question

T

Templar

I have a column of about 500 names each of which has an email address
immediately to the right of the name, such as
Peter Pan <[email protected]>

I need the <pancity2dot.com> in a separate column.

Can you help?
 
P

Pecoflyer

If there is a space between name and email, try Data - text to columns
use space as delimite
 
L

Lars-Åke Aspelin

I have a column of about 500 names each of which has an email address
immediately to the right of the name, such as
Peter Pan <[email protected]>

I need the <pancity2dot.com> in a separate column.

Can you help?
Click to expand...


If the original data is in column A starting at row 1,
try the following formula in cell B1

=MID(A1,FIND("<",A1),999)

Copy down 500 rows.

Column B will now contain the part of the data that starts with a "<"

Hope this helps / Lars-Åke
 
M

mikeaj72

This works on column A
Sub Test()

Columns("A:A").TextToColumns Destination:=Range("A1"),
DataType:=xlDelimited, _
TextQualifier:=xlNone, ConsecutiveDelimiter:=True, Tab:=True,
Semicolon _
:=False, Comma:=False, Space:=False, Other:=True,
OtherChar:="<", _
FieldInfo:=Array(Array(1, 1), Array(2, 1)),
TrailingMinusNumbers:=True
Set Rng = Range(Cells(1, 2), Cells(Rows.Count, 2).End(xlUp))
For Each c In Rng
c.Value = "<" & c.Value
Next c
End Sub
 
Top