Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 806
Default How to remove duplicate text with comma seperated

Hello,

Function NoDupe(r As Range) As Variant
Dim rC As Variant, obj As Object
Set obj = CreateObject("Scripting.Dictionary")
For Each rC In Split(r, ",", -1)
obj.Item(rC) = rC
Next rC
NoDupe = Join(obj.keys, ",")
Set obj = Nothing
End Function

Regards,
Bernd
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 70
Default How to remove duplicate text with comma seperated

Thank Guys..
It's work find.

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
How to remove duplicate text with comma seperated RB Smissaert Excel Programming 0 December 15th 09 12:02 AM
Check if text box has more than one entry seperated by a comma Les Excel Programming 2 September 16th 08 12:22 AM
Importing Text File with Comma Seperated Data - Need Help Pls Brando Excel Discussion (Misc queries) 1 April 17th 08 04:59 AM
How to split a value seperated by comma? Ticktockman Excel Discussion (Misc queries) 2 March 23rd 06 04:20 PM
Importing Comma Seperated Text Please Help ? Byron Excel Discussion (Misc queries) 1 August 16th 05 10:36 AM


All times are GMT +1. The time now is 01:05 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"