Brug af sql i vba

Nå, ja.. me.feltnavn = table1.id

eller for den skyld hvordan tildeler man forespørgslen til en variabel, eks:

dim var1
var1 = table1.id

rettere, hvordan tildeler man resultatet af en forespørgslen til en variabel, eks:

dim var1
var1 = table1.id

Dim var as variant 'brug rigtige datatype, hvis du kender den
Dim db as database
Dim rs as recordset
Dim SQL as string
SQL= "SELECT Table1.id, Table1.linie FROM Table1 WHERE ((Table1.linie)=[forms]![menu]![linie]))"
set db = currentdb
set rs = db.openrecordset(SQL)
var = rs!id

set rs=nothing

Hvis det er blot er en enkelt værdi du skal hente kan du ligeså godt bruge Dlookup.

Dim var as variant
var = dlookup("[id]","table1","Me!linie = " & [forms]![menu]![linie])

hvis du har et felt på formularen, der hedder "linie" og hvis det er et tal.
Hvis det er tekst skal du bruge:
var = dlookup("[id]","table1","Me!linie = '" & [forms]![menu]![linie] & "'")

!~)

hov de her må være:
var = dlookup("[id]","table1","[linie] = " & [forms]![menu]![linie])
var = dlookup("[id]","table1","[linie] = '" & [forms]![menu]![linie] & "'")

men det virker vist. Tak for point.