Hide duplicates and only count those records

I'm helping a user set up a report where he wants to hide the duplicates.  That's no problem.  The problem is he wants to count the records under each category, but he only wants to count those records that are unique.  So in other words, if the Office Name "Taylor Service Center" appeared 3 times under a category, he only wants to display it once and count it once.  How do I count only unique records???  We're using Access 97.  If I have to use code, please be very specific, as I'm not a programmer.  Thanks.
esu4236Asked:
Who is Participating?

[Webinar] Streamline your web hosting managementRegister Today

x
 
PsychoDazeyConnect With a Mentor Commented:
I think the easiest way would be to build a query and set the record source for the report to the query.
Go into query design view and select the fields you want in the report.  Then click on the "Sum" Button on the menu bar.  That will add a row called "Totals".  For the records you want counted, click count in the sum column.  The help file is pretty extensive onn this subject.
0
 
chuck_forbesCommented:
Maybe, group the report on the field Office name, and put a RunningSum (see help menu on this) in the footer of that group (you can set it's visible property to NO and set the group footer's Can Shrink property to Yes - so that it doesn't appear in the final report). Then in the Report Footer, put a text box that refers to the text box that contained that running sum with "=Sum(txtRunningSum)". Just guessing though, never tried it.

-Chuck
0
 
esu4236Author Commented:
The report is already grouped on the Office Name.  I have a group footer set up and that's where I'm doing the count function.  I cannot do a RunningSum or a Sum function on this field, as it's not a numerical field.  It's text.  So I think I have to do some sort of counting, but I need to only count unique records.
0
 
Jim Dettman (Microsoft MVP/ EE MVE)PresidentCommented:
You can also do the count right in the report.  In the report declarations section, dim a variable to hold the total:

 Dim intItemCount as integer

then in the Group Headers OnPrint event do:

  intItemCount = 0

then in the detail sections OnFormat event do:

  If FormatCount = 1 then
     intItemCount = intItemCount + 1
  End If

and last, in the Group Footers OnFormat event, place the count in a unbound text control:

  Me![txtGroupCount] = intItemCount

 'txtGroupCount' is the name of the control that you create.

Jim.
0
 
esu4236Author Commented:
I ended up adding another column in the underlying query where it is counting the office names.  And then in the report, I'm counting the total office names under each agency in a group footer.

JDettman - I wanted to try your suggestion, but I didn't understand it.  I didn't understand what you meant about "in the report declarations section, dim a variable".  I had no idea where to go for this.  Sorry.
0
All Courses

From novice to tech pro — start learning today.