lookup på tværs i en record

Og hvad er problemt?

'Hi fynbohans'
Hvordan får jeg lavet den kombo boks som har indholdet product1...7 og som gerne skulle returnere værdien svarende til valget af product1...7

i min tabel base har jeg følgende felter [product1],[product2],[product3],[product4],[product5],[product6],[product7].Det skal være indholdet af min combo boks. Hvis jeg vælger feks. [Product1] skulle den gerne returnere værdiet i [figure1] o.s.v

use the combo box wizard

'hi terry' kan umiddelbart ikke se at combo box wizard'en kan bruges, da [product1] til 7 ligger i same record?

In the Wizard you can also choose to "Type in the Values you want"! Sounds like another normalization problem to me Jan :o)

Not sure exactly what your using this for but if you make this combo using the wizard you could then use a "select case" in the combo's AFTER UPDATE event

SELECT CASE me.YourCombo

Case 1
do something
Case 2
do something
Case...
do something
End Select

Forstår stadig ikke helt dit problem, men når man ser på din overskrift, kunne man få den tanke, at du gerne vil bruge værdierne fra KomboBoxen i forskellige felter i din formular for en bestemt record.

I så fald skal du bare i felterne skrive =KomboBoxensNavn.Coloumn(1),
osv.

Er der staidg ikke nogen som kan hjælpe?

Indholdet af kombo boksen skal komme fra [Felt1],[Felt2],[Felt3],[Felt4] (fra samme record. Skal returnere værdien svarende til valget fra kombo boksen. feks
[felt1] skal returnere [figure1] osv

Jan, a combo can contain values from a table or query and it can also contain values you enter yourself.
Lest say you have a table with fields containing "Product 1", "Product 2", "Product 3" and so on.
In the wizard you would enter
Product 1
Product 2
Product 3

so that when you opne the combo you see these values (as text).
If you want to return another value then you enter 2 in the number of column and then you will see that now you have TWO columns. So you could enter

Column 1  Column 2
-------------------
Product 1 Return Value 1
Product 2 Return Value 2
Product 3 Return Value 3

then you can use Me.TheCombo.column(1) to get hold of the Retrun value.

'terry' tror nok jeg forstår dit svar. Vil prøve at rode lidt med det

'terry' har laget en test db på adressen www.schoesler.com/test.mdb måske forklarer det mit ønske.
I det gule combo felt hvor der står Core 145 skulle der gerne fremkomme 7 produkter fra recorden 069/03. (SN 90, Core 145, Core 150 og Core 600)oplysningerne ønskes hentet fra recorden 069/03 felt [product1].... [product7]
og skal returnere de respektive tal [BLFIG1] hvis product 1 vælges
Håber du kan hjælpe
Jan

Hi Jabm I will take a look when I get a bit of time :o)

Jabm = Jan (too much to drink :o) )
Jan, I dont seem to be able to open that link can you send it to me?
eksperten@santhell.dk (compact + zip if possible)

'terry' here it comes

her er løsningen modtaget af Terry. Endnu engang tak, havde aldrig fundet ud af uden hjælp fra eksperten

Hilsen Jan

Private Sub Form_Current()
Dim sRowSource
Dim i As Integer
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset

    Set rs = New ADODB.Recordset
    With rs
       
        Set .ActiveConnection = CurrentProject.Connection
       
        .Open "Select * From Base Where [Voyage number] = '" & Me.Voyage & "'", , adOpenForwardOnly, adLockReadOnly
   
    End With
   
    If rs.EOF Then
        MsgBox "Select voyage number first and then product name"
        Exit Sub
    End If
   
    sRowSource = ""
   
    For i = 1 To 7
   
        If Len(rs("Product" & i)) > 0 Then
            sRowSource = sRowSource & rs("Product" & i) & ";" & rs("blfig" & i) & ";"
        End If
       
    Next i
   
    Me.Product.RowSource = sRowSource
   
    rs.Close
    Set rs = Nothing
   
End Sub

thanks Jan :o)