Sub delslash()
For Each c In Selection
If InStr(c, "/") 0 Then
c.Value = Left(c, Len(c) - InStr(c, "/"))
End If
Next
End Sub
--
Don Guillett
SalesAid Software

wrote in message
ups.com...
HI hope some one can help
i have been tring to wolr this out myself by reading previous post but
i still none the wiser

i have a column of numbers and what i need to do is is ther is a / in
the field i need to delete it and any numbers after it
can someone please help i have looked at other examples but dont fully
understand what they do

Andy