IIf begning

ændres det slet ikke? Eller ændres det bare senere end det andet?

det ændres slet ikke.

dvs, at du har 3 ubundne felter, hvoraf de 2 af dem indeholder en iif-sætning?

Er, den som ikke virker, bare tom eller står der f.eks. #navn i den?

jeg har 2 ubundne. 1 som indeholder en værdi fra en kombinationsboks f.eks. 6,70. Nr. 2 ubundne felt indeholder iif beregningen og et 3. felt hvori resultatet fra nr 2 gemmes.

Jeg har konstanteret at der ikke fremkommer fejlmeddelser i de 2 ubundne felter.

Undskyld, at jeg spørger en del, men der er stadig mange muligheder for hvordan dit system kan være sat op.

Du skriver: "1 som indeholder en værdi fra en kombinationsboks". Hvordan kommer den værdi ind i tekstboksen? Står der bare: =Dintekstboks

Tilsvarende for 3'eren. Står der bare: =tekstboks2 (og det er denne, som ikke bliver udfyldt, ikke?)

spørgsmål er da helt ok!

Felt 1 er en kombinationsboks indeholder 2 værdier. Den første af disse 2 værdier bliver vist i kombinationsboksen, mens den 2. værdi overføres til det ubundne felt via me.tekst1 = me.kombinationsboks.column (1). Denne lille kode virker helt fint.

Problemet ganske rigtigt i 3. felt som ikke bliver opdateret. Dvs. der står resultatet for en tidligere beregning, hvilket efter en ændring i kombinationsboksen ikke længere er korrekt. Det er altså denne reaktivering af det ubundne felt nr. 2 som mangler.

Jeg går ud fra, at me.tekst1 = me.kombinationsboks.column (1) ligger på komboboksens AfterUpdate?

Hvor ligger koden, som skriver til felt3?  Og hvad står der helt præcist?)

koderne for de 3 felter er følgende:


Kombinationsboksen
1) Me.Tekst242 = Me.Reference.Column(2) som ligger både ved ændring og exit. Column(2) vises i tekst242

Ubundet beregningsfelt (tekst210)
2) =IIf([NyeBilavance]>=[tekst242];"Flot niveau";IIf([nyebilavance]>[tekst242];"Højt niveau";IIf([nyebilavance]>=[tekst242];"Pænt niveau";IIf([nyebilavance]<0;"Meget beskedent niveau";"Beskedent niveau"))))

Feltet som resultatet fra tekst210 gemmes i.
3) Me.NyebilavanceBem = Me.Tekst210. Afspilles ved exit.

Jeg ved at den ikke-dovne nørd vil have givet felterne navne, men desværre....

du har samme kritiere for flere

'=IIf([NyeBilavance]>=[tekst242];"Flot niveau"; 'samme som linie 3
'IIf([nyebilavance]>[tekst242]; "Højt niveau"; ' denne er næsten samme krav opfyldes også i både 1 og3
'IIf([nyebilavance]>=[tekst242];"Pænt niveau"; ' samme som linie 1
'IIf([nyebilavance]<0;"Meget beskedent niveau";"Beskedent niveau"))))

på kombinationsboksens VedÆndring og vedExit kan du tilføje denne linie: tekst210_Exit således at koden ialt nu bliver:

Private Sub Reference_Exit()
    Me.Tekst242 = Me.Reference.Column(2)
    tekst210_exit
End Sub

Dog vil jeg anbefale at holde dig til AfterUpdate i stedet for at bruge Exit og Ændring. Hvis du flytter koden til Afterupdate for tekst210, så skal du selvfølgelig skrive tekst210_AfterUpdate på Reference_AfterUpdate

Jeg prøver at teste her i weekenden - vender tilbage senest mandag aften. Go' weekend