try to use this UDF (user defined function)
Function UniqueList(Dat As Range)
   ' List of UnSorted Unique Values  '
   '-----------------------------------------'
   Dim Cel As Range, vArr(), n As Long, Tx As String
   Tx = ", "
   For Each Cel In Dat
      If InStr(1, Tx, ", " & Cel & ", ") = 0 Then
         Tx = Tx & Cel & ", "
      End If
   Next Cel
   If Len(Tx) > 0 Then Tx = Left(Tx, Len(Tx) - 2)
   If Len(Tx) > 0 Then Tx = Right(Tx, Len(Tx) - 2)
   UniqueList = Tx
End Function



On Sat, May 7, 2011 at 3:50 PM, karan 1237 <karan1...@gmail.com> wrote:

>   *
> LIST1* *LIST1* *LIST1* *RESULT*  BACK SIDE FRONT BACK, SIDE, FRONT  FRONT
> SIDE FRONT FRONT, SIDE  BACK FRONT BACK BACK, FRONT  FRONT FRONT FRONT
> FRONT
> *Hi Experts,
>
> I want like this. Please help.
>
> Thnx in Advance.
>
>
> *
> ııllllııllıı ~ ♣ кαяαηη ♣ ~ ııllllııllıı
>
>  --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel

Attachment: UDF_UniqValues.xlsm
Description: application/vnd.ms-excel.sheet.macroenabled.12

Reply via email to