Creating a range with distinct items

[Cage]

I have a range e.g myrange=A,B,B,C,D,C,E and I would like to create a new range containing only distinct items, e.g distinct(myrange) = "A,B,C,D,E"

VBA supports a union and intersect, but I cannot find one for distinct, is there a simple function which will do this or do I need to create my own. any ideas?

TIA

Cage