Delete etxra information from cells
 

I need to delete information in cell

for example if A2= http://google.com/help/you/me

I want to remove everything after "com"

So i would want A2 = http://google.com

Delete etxra information from cells
 

Try something like

Dim Pos As Long
Pos = InStr(Range("A1").Text, ".com")
If Pos = 0 Then
Exit Sub
End If
Range("A1").Value = Left(Range("A1").Text, Pos + 3)



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

"Shani" wrote in message
oups.com...
I need to delete information in cell

for example if A2= http://google.com/help/you/me

I want to remove everything after "com"

So i would want A2 = http://google.com

Delete etxra information from cells
 

=LEFT(A2,FIND("com",A2)+2)

--
Kind regards,

Niek Otten

"Shani" wrote in message oups.com...
|I need to delete information in cell
|
| for example if A2= http://google.com/help/you/me
|
| I want to remove everything after "com"
|
| So i would want A2 = http://google.com
|

Delete etxra information from cells
 

thank you very much