#1   Report Post  
Ket
 
Posts: n/a
Default VB Required??

Hello,

I am using excel 2003 on windows xp.

I have a column of information that contains the values 'YES', 'NO, or
'DUPLICATE'.

How can I create a formula that looks at all instances of YES and
provides a unique reference number (eg000001,000002 etc) for that
instance in the adjacent cell. The same applies for every instance of
'NO'.
Where a duplicate record exists, that entire row needs to be deleted.

Any assistance offered, gratefully recieved.

Many thanks.

Ket
London, UK
  #2   Report Post  
Anne Troy
 
Posts: n/a
Default

Well, you'll likely want to delete the duplicates first:
http://www.officearticles.com/excel/...ft_excel. htm
Then you can simply insert a reference number and copy down.
*******************
~Anne Troy

www.OfficeArticles.com
www.MyExpertsOnline.com


"Ket" wrote in message
...
Hello,

I am using excel 2003 on windows xp.

I have a column of information that contains the values 'YES', 'NO, or
'DUPLICATE'.

How can I create a formula that looks at all instances of YES and
provides a unique reference number (eg000001,000002 etc) for that
instance in the adjacent cell. The same applies for every instance of
'NO'.
Where a duplicate record exists, that entire row needs to be deleted.

Any assistance offered, gratefully recieved.

Many thanks.

Ket
London, UK



  #3   Report Post  
Bob Phillips
 
Posts: n/a
Default

Ket,

This tests for the value in column A, and puts the id in B. It is case
agnostic.

Sub Test()
Dim iLastRow As Long
Dim i As Long
Dim cYes As Long
Dim cNo As Long

iLastRow = Cells(Rows.Count, "A").End(xlUp).Row
For i = iLastRow To 1 Step -1
If LCase(Cells(i, "A").Value) = "duplicate" Then
Rows(i).Delete
End If
Next i

iLastRow = Cells(Rows.Count, "A").End(xlUp).Row
For i = 1 To iLastRow
If LCase(Cells(i, "A").Value) = "yes" Then
cYes = cYes + 1
With Cells(i, "B")
.Value = cYes
.NumberFormat = "000000"
End With
ElseIf LCase(Cells(i, "A").Value) = "no" Then
cNo = cNo + 1
With Cells(i, "B")
.Value = cNo
.NumberFormat = "000000"
End With
End If
Next i

End Sub


--

HTH

RP
(remove nothere from the email address if mailing direct)


"Ket" wrote in message
...
Hello,

I am using excel 2003 on windows xp.

I have a column of information that contains the values 'YES', 'NO, or
'DUPLICATE'.

How can I create a formula that looks at all instances of YES and
provides a unique reference number (eg000001,000002 etc) for that
instance in the adjacent cell. The same applies for every instance of
'NO'.
Where a duplicate record exists, that entire row needs to be deleted.

Any assistance offered, gratefully recieved.

Many thanks.

Ket
London, UK



  #4   Report Post  
Matt Lunn
 
Posts: n/a
Default

Ket,

Will you be adding more data to the column? That is, do you want to assign a
new reference every time a new value of YES, NO or DUPLICATE is added?


Matt

"Ket" wrote:

Hello,

I am using excel 2003 on windows xp.

I have a column of information that contains the values 'YES', 'NO, or
'DUPLICATE'.

How can I create a formula that looks at all instances of YES and
provides a unique reference number (eg000001,000002 etc) for that
instance in the adjacent cell. The same applies for every instance of
'NO'.
Where a duplicate record exists, that entire row needs to be deleted.

Any assistance offered, gratefully recieved.

Many thanks.

Ket
London, UK

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
highlighting required fields maryann Excel Worksheet Functions 2 June 23rd 05 06:16 PM
Required fields Emily Excel Discussion (Misc queries) 1 June 23rd 05 12:59 AM
SPECIFY REQUIRED PAPER SIZE IN EXCEL 2000 Augustine Excel Discussion (Misc queries) 0 January 17th 05 12:05 PM
MS Office error message, "a required .DLL file, MSO97.DLL ..." Steve Setting up and Configuration of Excel 1 January 13th 05 02:04 AM
Rate of return required formula Alorasdad Excel Worksheet Functions 1 November 18th 04 03:14 AM


All times are GMT +1. The time now is 06:41 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"