Try:

Function taz(str as String)
taz = Left(str, Len(str) - 2)
End Function


--
Rob van Gelder - http://www.vangelder.co.nz/excel


"teresa" wrote in message
...
Hi, I have a list as follows:

USA--
UK--
JAPAN--

I need to define a function which will return
USA
UK
JAPAN

I have tried the following but I think it needs some tweaking - thks for
help

Function taz(x)

Dim i As Long
i = InStr(x, "--")
char = Trim(Left(cell, i - 1))

End Function