Solved

MS ACCESS - flag duplicates in to the same table

Posted on 2010-11-09
7
1,112 Views
Last Modified: 2012-06-27
(1) My ACCESS Table1 has following columns, i.e., Field1, Field2, Field3, ..., Field 10 with 750,000 records.

(2) FIELD2 is supposed to contain unique value, but somehow there are over 10,000 duplicate values in it. I found this by using

SELECT Table1.FIELD2, count(Table1.FIELD2) as CheckDupe from Table1 group by 1 where CheckDupe>1

QUESTION:
I'd like to find an effective way to
(A) Make Table1 to have extra column FIELD11 as a flag
(B) FIELD11 = "Yes" If FIELD2 contains duplicate value and "No" when it contains unique value?

I am just an intermediate MS ACCESS level.  I found that the following solution would work, but very inefficient ie.,
(i) Make a text list of dupe values in MS WORD "Value1", "Value2", ...., "Value10000"
(ii) Create an intermediate table (called Table2) from Table1 that contain only 2 fields, i.e., FIELD2 and FIELD11, where as FIELD11 = ""
(iii) write an UPDATE query like this:

UPDATE TABLE2 SET TABLE2.FIELD11 = "Yes"
WHERE TABLE2.FIELD2 IN ("Value1", "Value2", ... , "Value1000");

(iv) run this query. then replace the next thousand values, save and run. then redo this again . . . .  until all 10,000 values are covered.

The problem is 1. I have 5 other tables that have the same problem. I dont want to spend the whole week doing this.  So, Help please.
0
Comment
Question by:Paul_ATL
  • 4
  • 3
7 Comments
 
LVL 58

Assisted Solution

by:cyberkiwi
cyberkiwi earned 250 total points
ID: 34097263
Add a new column into Table1 using the UI.
Run this query (if field2 is textual)

update Table1
set Field11 = IIF(DCount("Field2", "Table1", "Field2='" & Field2 & "'")>0,true, false)
0
 

Author Comment

by:Paul_ATL
ID: 34097500
Hi cyberkiwi,

I did as suggested to add FIELD11.
Then Copy-PASTE your query in to an UPDATE querym but when run, it asks me for "parameter entry" of TABLE1
0
 

Author Comment

by:Paul_ATL
ID: 34097556
Hi cyberkiwi,

Sorry, I made some typos.

Your query runs, but when checking the result, it only updates FIELD11 with value -1 for all records.
0
Ransomware-A Revenue Bonanza for Service Providers

Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat.  The purpose of this eBook is to educate the reader about ransomware attacks.

 

Accepted Solution

by:
Paul_ATL earned 0 total points
ID: 34097655
Hi cyberkiwi,

I works now. I change >0 to >1
Thanks for your help. Save me lots of time.
0
 
LVL 58

Expert Comment

by:cyberkiwi
ID: 34097665
What type is Field2?

Another approach, make Field11 a Number field, then try this query:

update Table1
set Field11 = DCount("Field2", "Table1", "Field2='" & Field2 & "'")

Actually never mind, I see the error. It should be greater than 1...

update Table1
set Field11 = IIF(DCount("Field2", "Table1", "Field2='" & Field2 & "'")>1,true, false)
0
 
LVL 58

Expert Comment

by:cyberkiwi
ID: 34097685
You're welcome! Makes me happy when askers help themselves :)
0
 

Author Closing Comment

by:Paul_ATL
ID: 34130279
Great advice, just minor issue on >1 instead of >0 but I can figure this out.  But certainly, without his advice, I will NEVER figure to use DCOUNT.

Thanks a bunch
0

Featured Post

SharePoint Admin?

Enable Your Employees To Focus On The Core With Intuitive Onscreen Guidance That is With You At The Moment of Need.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A simple tool to export all objects of two Access files as text and compare it with Meld, a free diff tool.
Describes a method of obtaining an object variable to an already running instance of Microsoft Access so that it can be controlled via automation.
Using Microsoft Access, learn some simple rules for how to construct tables in a relational database. Split up all multi-value fields into single values: Split up fields that belong to other things into separate tables: Make sure that all record…
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

733 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question