You could just take the Val of the string and it will return only the
numerical part before the /

Val("1234/XYZ") returns 1234

Sub SlashDelete()
Dim c As Range
For Each c In Selection
c = Val(c)
Next
End Sub

--
Cheers
Nigel



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