Avatar billede lunddata Nybegynder
13. maj 2011 - 16:50 Der er 10 kommentarer og
1 løsning

Værdi i kombinationsboks

Hvordan er det nu lige at der i kombinationsboks automatisk er valgt en værdi fra en tabel? Det kunne f.eks være at boksen viser:
-Vælg-
eller
-
Værdien -Vælg- eller værdien - må gerne være den første værdi fra en tabel.

Lidt udpindet kunne det være en kombinationsboks med følgende værdier i rækkefølge:
-Vælg-
værdi 1
værdi 2
værdi 3
Avatar billede terry Ekspert
13. maj 2011 - 17:55 #1
something like this maybe

Me!Combo0.DefaultValue = _
"""" & Me!Combo0.ItemData(0) & """"
Avatar billede terry Ekspert
13. maj 2011 - 17:55 #2
.
Avatar billede lunddata Nybegynder
13. maj 2011 - 20:24 #3
Hvordan? og hvor er det lige jeg sætter dette ind?
Er nødt til at spørge, da det er lidt længe siden jeg har arbejdet med dB.
Avatar billede terry Ekspert
13. maj 2011 - 20:38 #4
Depends when you actually want to see thedefaukt value.

If you are showing an existing record then you wan to show the value selected when the record was created.

So maybe when you create a new record?

In the forms onCurrent event you need to test for a new record

if me.newrecord then
Me!Combo0.DefaultValue = _
"""" & Me!Combo0.ItemData(0) & """"

End-If
Avatar billede lunddata Nybegynder
14. maj 2011 - 09:21 #5
Har prøvet dette:

Private Sub Form_Open(Cancel As Integer)
DoCmd.Requery
DoCmd.GoToRecord acForm, "Bestillinger", acNewRec

If Me.NewRecord Then
Me!ComboKlub.DefaultValue = _
"""" & Me!ComboKlub.ItemData(0) & """"
End If
End Sub

hvor Klub er navnet på tabellen med værdierne

-
værdi 1
værdi 2
værdi 3

Jeg får fejlmelding ved følgende:
Me!ComboKlub.DefaultValue = _
"""" & Me!ComboKlub.ItemData(0) & """"
Avatar billede terry Ekspert
14. maj 2011 - 13:56 #6
what error do you get?
Avatar billede lunddata Nybegynder
14. maj 2011 - 15:03 #7
Fejlmeldingen er:
Runtime error 2465
Microsoft Ofiice Access kan ikke finde feltet ComboKlub der refereres til i udtrykket.

... Ved nærmere eftertanke er det vel fordi jeg har en underformular ved navn Forespørgsel1 og med et felt ved navn Klub.

... men hvordan pokker får jeg dette korrekt med?
Avatar billede terry Ekspert
14. maj 2011 - 15:28 #8
any chance of seeing the dB?
ekspertenATsanthell.dk
AT= @
Avatar billede terry Ekspert
15. maj 2011 - 09:44 #9
Private Sub Form_Current()
If Me.NewRecord Then
    Me.Klub.DefaultValue = Me.Klub.ItemData(0)
End If

End Sub
Avatar billede terry Ekspert
15. maj 2011 - 19:49 #10
don forget to accept!
Avatar billede lunddata Nybegynder
18. maj 2011 - 06:30 #11
Mange tak for løsningen.
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