Search for URL and copy URL to new cell

[corzo]

Using Excel 2002.

Search cell for URL, copy URL only, and paste to new cell.

For example:

If A1 contains a URL:
A1 = Hi, my name is corzo http://test.com.

Then copy URL only to new cell:
A2 = http://test.com

Thanks kindly in advance.

 

[hiker95]

corzo,

Welcome to the MrExcel forum.

Based on your example, how about something like this?

Excel 2007
	A	B
1	Hi, my name is corzo http://test.com	http://test.com
2	http://test.com
Sheet1

Cell Formulas
Range	Formula
B1	=MID(A1,FIND("http",A1,1),LEN(A1)-FIND("http",A1,1)+1)
A2	=MID(A1,FIND("http",A1,1),LEN(A1)-FIND("http",A1,1)+1)

 

[corzo]

hiker95, perfect! Thank you very much.

corzo,

Welcome to the MrExcel forum.

Based on your example, how about something like this?

Excel 2007

	A	B
Hi, my name is corzo Create Tests for Organizational Training and Certification Programs ? Test.com	http://test.com
http://test.com

<tbody>
[TD="align: center"]1[/TD]

[TD="align: center"]2[/TD]

[TD="align: right"][/TD]

</tbody>

Sheet1​

[TABLE="width: 85%"]
<tbody>[TR]
[TD]Worksheet Formulas[TABLE="width: 100%"]
<tbody>[TR="bgcolor: #E0E0F0"]
[TH]Cell[/TH]
[TH="align: left"]Formula[/TH]
[/TR]
[TR]
[TH="bgcolor: #E0E0F0"]B1[/TH]
[TD="align: left"]=MID(A1,FIND("http",A1,1),LEN(A1)-FIND("http",A1,1)+1)[/TD]
[/TR]
[TR]
[TH="bgcolor: #E0E0F0"]A2[/TH]
[TD="align: left"]=MID(A1,FIND("http",A1,1),LEN(A1)-FIND("http",A1,1)+1)[/TD]
[/TR]
</tbody>[/TABLE]
[/TD]
[/TR]
</tbody>[/TABLE]

 

[hiker95]

corzo,

Thanks for the feedback.

You are very welcome. Glad I could help.

And, come back anytime.