Find email and copy

Closed
-
Posts
261
Registration date
Saturday April 11, 2009
Status
Member
Last seen
June 21, 2011
-
Hello,
I need to check on email id example "antony.mark@hotmail.com" or John.herald@hotmail.com" which is part cell between range("A1", "A500");

Example: Cell(A1) - Assignee: "sundar.Aruchamy@hotmail.com""Product" / "Status"
Cell(A10) - Assignee: "Anto.herald@hotmail.com""Product" / "Status"
Cell(A20) - Assignee: "Leena.been@hotmail.com""Product" / "Status" ..... upto Range("A500")

I need help to copy only the email ids to another Cell maybe sheet2.A1 using a for look.

Can anyone help me on this.
It will be of great help guys.

Thanks
Antony Herald.

2 replies

Posts
261
Registration date
Saturday April 11, 2009
Status
Member
Last seen
June 21, 2011
307
use mid function
start=12
len=find(for com)+3
Hi

Thank you for the input, I could understand how it works, but i'm currently using VBA and the MID, FIND are excel macros, and when I try to use then in VBA, I get an error "function not defined", so is there any equal function in VBA this will help achieve your suggestion.

- Herald A.
Posts
261
Registration date
Saturday April 11, 2009
Status
Member
Last seen
June 21, 2011
307
before mid or find, use worksheetfunction ie, worksheetfunction.mid