[AccessD] Record Count From Group Header

Actually, I got it after a bit of juggling.  Kludgey solution but it works:

Dim lngOnPrintCount

In the Report_Open event: lngOnPrintCount = 0 

In the OnPrint event of the group lngOnPrintCount = lngOnPrintCount + 1

Put a text box on print in the report footer.  Then, in the OnFormat event of the report footer txtOnPrint = lngOnPrint

Rocky

  ----- Original Message ----- 
  From: Susan Harkins 
  To: Access Developers discussion and problem solving 
  Sent: Sunday, September 07, 2003 12:09 PM
  Subject: Re: [AccessD] Record Count From Group Header


  http://techrepublic.com.com/5100-6329-5034488.html?tag=search

  Don't know whether it'll answer your question... but it has the general rules

  Susan H. 

   
    Dear List:


    Is there a way to extract the record count from a group header and put it into a control in the report footer?  =Me.Count gives me the count of the detail records.  =[Count] gives me the count of detail records.  [GroupHeader3].[Count] gives me #Name?.

    I believe I've seen this syntax generated by the wizard but can't duplicate it.

    MTIA,

    Rocky Smolin
    Beach Access Software



----------------------------------------------------------------------------


    _______________________________________________
    AccessD mailing list
    AccessD at databaseadvisors.com
    http://databaseadvisors.com/mailman/listinfo/accessd
    Website: http://www.databaseadvisors.com



------------------------------------------------------------------------------


  _______________________________________________
  AccessD mailing list
  AccessD at databaseadvisors.com
  http://databaseadvisors.com/mailman/listinfo/accessd
  Website: http://www.databaseadvisors.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://databaseadvisors.com/pipermail/accessd/attachments/20030907/6f01d761/attachment-0001.html>