Alderen kan du beregne ved at indsætte nedenstående i et modul:
Public Function Alderberegning(Dato As Date) As Integer If DateSerial(Year(Date), Month(Dato), Day(Dato)) > Date Then Alderberegning = DateDiff("yyyy", Dato, Date) - 1 Else Alderberegning = DateDiff("yyyy", Dato, Date) End If End Function
Jeg er bange for, at jeg ikke helt forstår hvordan ... Er det muligt, at få lidt mere hjælp til at lave selve rapporten... Jeg sender gerne et link til databasen, hvis det hjælper...
Jeg har downloadet den fejlbehæftede db. Der manglede at blive importeret et modul. Ellers blec løsningen som ovenfor beskrevet.
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.