Avatar billede budda Nybegynder
14. december 2005 - 15:43 Der er 3 kommentarer og
1 løsning

Ændre et tal til en tekst i rapport

Jeg har lavet et spørge skema jeg nu har sat ind i en access database.
Hvor man evt kunne vælge mellem 1-4 hvor de havde en titel.
eks:
1. Jordbær
2. Franskbrød
3. Fasan
4. Julen?

Nu vil jeg gerne når jeg skal udskrive rapporten at 1 bliver til Jordbær osv. og hvis der står 0 eller et andet tal står der fejl.

Har fundet funktionen IIF men ved ikke hvordan jeg sætter den ind.

Nogen der kan hjælpe?
Avatar billede jesperfjoelner Nybegynder
14. december 2005 - 16:39 #1
IIF duer bedst hvis der kun er et par muligheder.

I stedet skal du baserer din rapport på en forespørgsel i stedet for en tabel (som jeg gætter på du har nu).

Forespørgslen laves ud fra din tabel og så den tabel, hvor din valgmuligheder (1-4) står. I forespørgslen skal du bruge alle felter fra svartabellen og det beskrivende felt fra tblSvarmuligheder.

I din rapport skal feltet med jordbær, franskbrød osv., så være synligt i stedet for det ID-felt, du har i svartabellen.
Avatar billede budda Nybegynder
14. december 2005 - 20:11 #2
Nu snakker vi kun om 36 poster i alt er det ikke bare at lave en nem løsning?
Avatar billede jesperfjoelner Nybegynder
14. december 2005 - 22:26 #3
Jamen - at inkludere ét ekstra felt i forespørgslen er den nemmeste løsning.

Hvad er datakilden til din rapport?
Avatar billede fynbohans Nybegynder
15. december 2005 - 01:01 #4
Feltet med tallet [TALVALG] laver du som et skjult felt.
Feltet, hvor teksten skal stå kalder du [TEXT]. 
Dernæst laver du følgende funktion VBA (klik på Programkode):

Function VisText()
        Dim a As Long
        a = [TALVALG]

        Select Case a
                Case 1
                VisText = "Jordbær"

                Case 2
                VisText = "Franskbrød"
               
                Case 3
                VisText = "Fasan"
               
                Case 4
                VisText = "Julen"
               
                Case Else
                VisText = "Fejl"
        End Select
End Function

Kontrolelementkilde for [TALVALG] er det valgte tal.
Ved kontrolelementkilde for [TEXT] skriver du = VisText().
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