Recent content by Aietoe

I'm not much familiar with that kind of code, but thanks anyway, i'll see what i can do. Thanks Aietoe

Hi! When a user access my database, the first thing that is done is the execution of a macro. In the macro, a table is first opened and the user is asked to enter his userid and password to access the database. Even if the user enter a wrong password, he gets a couple of error messages but...

Many thanks and a star to PHV for his great help and his patience. Aietoe!

Hi PHV, Many queries are executed to endup to the final table. If i understand what your looking for, i would have to add-up 2 additionnal fields to make the record unique. The table would then look like this: Name Date Act ActSeq Joe 2004-08-10...

Created by a query. Aietoe

Unfortunatly no. Aietoe!

Hi PHV, Making more tests, i found out that when 2 or more records have the same date, the diff stays the same for all records. EX: Name Date Diff Joe 2004-08-10 0 Joe 2004-08-27 17 Joe...

Thanks a lot it does exactly what i'm looking for. Aietoe

Ok PHV, here is approximatly what my input looks like: Name Date Joe 2004-08-10 Joe 2004-08-27 Joe 2004-09-08 Joe 2004-09-08 ............................. sorted by name and date...

All i want to do is calculate the difference between the date field in the current record and the date field with previous record. I have tried to modify the code from the thread "query to compare data with previous record" but i do not understand it and finaly do not get any result(but many...

I CosmoKramer, I copied your exact code from Thread703-18458 as follow: Option Compare Database Option Explicit Dim GrpArrayPage(), GrpArrayPages() Dim GrpNameCurrent As Variant, GrpNamePrevious As Variant Dim GrpPage As Integer, GrpPages As Integer Private Sub PageFooter_Format(Cancel As...

I, Using Acces97 i'm trying to reset the page number to 1 on a group break. Here is my code: Private Sub PageFooter_Format(Cancel As Integer, FormatCount As Integer) Dim i As Integer ReDim Preserve GrpArrayPage(Me.Page + 1) ReDim Preserve GrpArrayPages(Me.Page + 1) If Me.Pages = 0 Then...

Hi! I have just converted an Access97 database to Access2002. The conversion seems to work just fine except that now, some dates do not appear in the reports. The way it works is: - i open a form where i fill in the dates (min and max) i want to use for an extraction - i...

Hi Jebry, I have tried to change my proc to : Private Sub PageFooter_Format(Cancel As Integer, FormatCount As Integer) Dim i As Integer ReDim Preserve GrpArrayPage(Me.Page + 1) ReDim Preserve GrpArrayPages(Me.Page + 1) If Me.Pages = 0 Then GrpNameCurrent = Me!Bénef If...

I, Using Acces97 i'm trying to reset the page number to 1 on a group break. Here is my code: Option Compare Database Option Explicit Dim GrpArrayPage(), GrpArrayPages() Dim GrpNameCurrent As Variant, GrpNamePrevious As Variant Dim GrpPage As Integer, GrpPages As Integer Private Sub...