Hi Dears,

Most of the times we have similiar and uniqe records in Col A.

for Example

ColA
Book
Cup
Tea
Book
Pen
Cup

Is there some codes. that if i clik a buttion, the data copy in col
and similiar words will copy only one time i.e similiar words wil
not copy Repeatedly.

For example

Col B
Book
Cup
Pen
Tea


Thanks and Regards

Syed Haider Al

--
Syed Haider Al
-----------------------------------------------------------------------
Syed Haider Ali's Profile: http://www.excelforum.com/member.php...fo&userid=2199
View this thread: http://www.excelforum.com/showthread.php?threadid=56043

Sub Test()
Dim iLastRow As Long
Dim i As Long
Dim j As Long

iLastRow = Cells(Rows.Count, "A").End(xlUp).Row
For i = 1 To iLastRow
If IsError(Application.Match(Cells(i, "A").Value, Columns(2), 0))
Then
j = j + 1
Cells(j, "B").Value = Cells(i, "A").Value
End If
Next i

End Sub


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"Syed Haider Ali"
<Syed.Haider.Ali.2asr1t_1152647710.2974@excelfor um-nospam.com wrote in
message news:Syed.Haider.Ali.2asr1t_1152647710.2974@excelf orum-nospam.com...

Hi Dears,

Most of the times we have similiar and uniqe records in Col A.

for Example

ColA
Book
Cup
Tea
Book
Pen
Cup

Is there some codes. that if i clik a buttion, the data copy in col B
and similiar words will copy only one time i.e similiar words will
not copy Repeatedly.

For example

Col B
Book
Cup
Pen
Tea


Thanks and Regards

Syed Haider Ali


--
Syed Haider Ali
------------------------------------------------------------------------
Syed Haider Ali's Profile:
http://www.excelforum.com/member.php...o&userid=21994
View this thread: http://www.excelforum.com/showthread...hreadid=560436

Thanks Bob for your guidance.

Syed Haider Ali


--
Syed Haider Ali
------------------------------------------------------------------------
Syed Haider Ali's Profile: http://www.excelforum.com/member.php...o&userid=21994
View this thread: http://www.excelforum.com/showthread...hreadid=560436