Databas

Du får allt speca dina tabeller mer för att man ska kunna svara på din fråga.
Varför har du inte både telefonnummer och namn i samma tabell?

....

Set dataBas = OpenDatabase(App.Path & "/Telbok.mdb")
Set namn = dataBas.OpenRecordset("TELE", dbOpenDynaset)

Do Until namn.EOF
Me.cmbNamn.AddItem namn("namn")
namn.MoveNext
Loop

Det skriver ut alla namn från databas som ser ut typ så här

tabell1 tabell2

Namn Telenr
Anna | 12345
Sofia | 67890
Pelle | 01010

osv

det jag då önskar är att jag trycker på låt säga "Sofia"
så skrivs 67890 ut i textrutan. sedan ska man kunna trycka på en knapp och msgbox ska visa tele numret.

den koden kan jag , det är bara det här med databaser som jag försöker lära mig.

Det går inte på det sättet du har valt.
Du måste ha något unikt ID för att databasen ska veta vad du vill ha.
Mitt förslag är att du lägger Namn och Telenr i samma tabell samt lägger till ett ID av typen autonumber.
ADD: På så sätt kan du spara ID:t som key i combolisten och använda det när du ska hämta numret.

...

Hur lägger man till det Id:et??

och ifall man lägger in en funktion i programmet som skriver till databasen, får det ett id då också?

Tack för att du hjälper :)

Du lägger till ID när du skapar tabellen eller ändrar i den i access.
Japp det skapas ett nytt för varje rad.

...

ok... bra :) ...

hur gör jag om jag vill att msgboxen ska skriva ut bara tel nret då och inte namnet???

om nu både namn & telnr , står i samma tabell?

Set namn = dataBas.OpenRecordset("select telenr from TELE where id = " & Me.cmbNamn.key, dbOpenDynaset)
if not namn.eof then
txtruta = namn("telenr")
end if

:)

Jag tackar & bockar! :)

Tack för all hjälp!

Ha en trevlig kväll!