Avatar billede it-assistent Nybegynder
05. juli 2002 - 14:11 Der er 3 kommentarer og
1 løsning

Rapporter - felter - lav kontrol og vælg kolonne

Jeg har en rapport der er baseret på en forespørgsel. Denne rapport skal udskrive nogle beløb og fordele dem i kolonner alt efter hvilken PGF det pågældende beløb er registreret under. Dette opnår jeg på følgende måde:
Textfield1
=IIf([Anmeldt paragraf]=97;[anmeldt_beløb])

Textfield2
=IIf([Anmeldt paragraf]=95;[anmeldt_beløb])

osv.

Nu stiger kompleksiteten lidt ved at jeg skal undersøge om en kolonne indeholder en værdi (lad os kalde kolonnen x) og på den baggrund skal jeg lave ovenstående stunt med enten [Anmeldt paragraf]/[anmeldt_beløb] eller [lb_Anmeldt_paragraf]/lb-anmeldt_beløb]

I psydokode ser det nogenlunde sådan her ud:
if (x == "")
this.textfield = =IIf([Anmeldt paragraf]=97;[anmeldt_beløb])
if (x != "")
=IIf([lb_Anmeldt_paragraf]=97;[lb_Anmeldt_beløb])



Avatar billede terry Ekspert
05. juli 2002 - 14:32 #1
your psydokode looks more like C to me :o)

I am not quite sure I understand what it is your trying to do but couldnt some of this be done in the query?

It is also possible to use VBA (code) in the report sections. There are events for these for example there is an On Format event for the detail section where I am sure you could do quite a bit of this!
Avatar billede terry Ekspert
05. juli 2002 - 14:33 #2
I would be prepared to take a look if it would help
terry@santhell.dk
06. juli 2002 - 08:01 #3
I rapportens detaljesektion (hvis det er der felterne ligger) lægger du følgende kode på Onformat-hændelsen:

if [X]="" then
  Select case ME![Anmeldt paragraf]
    Case 97: Me!ThisTekstfield = [anmeldt_beløb])
    Case 95: Me!ThisTekstfield = [anmeldt_beløb])
  end select
else
  Select case ME![lb_Anmeldt_paragraf]
    Case 97: Me!ThisTekstfield = [lb_anmeldt_beløb])
    Case 95: Me!ThisTekstfield = [lb_anmeldt_beløb])
  end select
end if


ThisTekstfield skal være et udundet felt.

/Thomas
06. juli 2002 - 08:03 #4
PS: Du kan selvfølgelig slå Case 95 og Case 97 sammen på en linie, hvis der skal stå det samme i begge tilfælde:

Case 95, 97: Me!ThisTekstfield = [lb_anmeldt_beløb])
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester