Remove Characters From Right of String

Hello,

I'm trying to remove everything after a specific character in a string.

I.e. change a website address to the hostname

http://www.excelforum.com/newthread.php
http://usa.excelforum.com/forum/new

to

excelforum.com
usa.excelforum.com

I'm using this formula, which strips the http:// and the www., but does not replace the characters after the first remaining "/" as the wildcard is not recognized.

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2,"www.",""), A2,"http://",""), A2, "/*", "")

Any help would be appreciated :-)

Thanks to Ron, Rahul and D_Rennie for replying! Much Appreciated :-)

I do need the formula to be dynamic as I will be making changes to the sheet and to ensure that I don't need to run a Macro every time I need to make changes.

I've worked with Ron's example to come up with a TWO column formula which does the trick.

B2
=SUBSTITUTE(A2,"www.","")

C2
=MID(B2,FIND("//",B2)+2,FIND("|",SUBSTITUTE(B2, "/","|",3))-FIND("//",B2)-2)

This works perfectly, other than it taking up an extra column.

When I tried to merge the pattern, I got lost again.. is possible to put this one column?

=MID(A2,FIND("//",A2)+2,FIND("|",SUBSTITUTE(SUBSTITUTE(A2,"www.",""), "/","|",3))-FIND("//",A2)-2)

Thanks again to all who replied :-)

Oh, looks like I got beaten to the punch while I was posting my last reply.

Dave's workaround is perfect! It places the formula in one column and addresses the www. issue!

PROBLEM SOLVED!!!

Thanks Dave :-) , and again, Thanks to Ron, Rahul and D_Rennie as well!

Perhaps try

=SUBSTITUTE(MID(A2,8,FIND("/",A2,FIND("//",A2)+2)-8),"www.","")

In fact you can shorten my suggestion as follows:

=SUBSTITUTE(MID(A2,8,FIND("/",A2,8)-8),"www.","")

...assumes that all your addresses begin with "http://"