Dont know what you want...
Remove 011 or keep 011?
Two examples - you choose.
Sub test1()
Dim str As String
str = "011548926 in."
str = Left(str, 3)
MsgBox str
End Sub
Sub test2()
Dim str As String
str = "011548926 in."
str = Mid(Split(str, " ", 2)(0), 4)
MsgBox str
End Sub
--
Rob van Gelder -
http://www.vangelder.co.nz/excel
"reggy" wrote in message
...