Find email and copy

Closed
AntoHere - Aug 9, 2009 at 09:02 PM
Excelguru Posts 261 Registration date Saturday April 11, 2009 Status Member Last seen June 21, 2011 - Aug 12, 2009 at 01:37 AM
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 responses

Excelguru Posts 261 Registration date Saturday April 11, 2009 Status Member Last seen June 21, 2011 307
Aug 10, 2009 at 06:25 AM
use mid function
start=12
len=find(for com)+3
0
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.
0
Excelguru Posts 261 Registration date Saturday April 11, 2009 Status Member Last seen June 21, 2011 307
Aug 12, 2009 at 01:37 AM
before mid or find, use worksheetfunction ie, worksheetfunction.mid
0