data fra tabel skal bruges i VBA

eks.

sub FindNavn()

Dim Db As Database, Rst As Recordset, krit As String {den sidste kan du bruge til at søge}
Set Db = Workspace(0).Databases(0)
Set Rst = Db.OpenRecordset(\"TabelNavn\", dbOpenDynaset) {her med dynamisk udvalg}

Krit = \"KolonneNavn = \'Anders And\'\"
Rst.FindFirst Krit
Do While Not Rst.NoMatch
Debug.Print Rst.Fields![KolonneNavn];
Rst.FindNext Krit
End Sub

Er det sådan nogenlunde det du mener?

de første tre linier er selvfølgelig det du skal bruge, det andet er bare et foreslag/eks.

Ja, det ser vist rigtigt ud. Men med mit ringe kendskab til VBA: Koden stopper når den når til Workspace. Er det mig, der laver noget ravende forkert.

vh
Sailor

Ja, undskyld at det tog lidt tid. Nu har jeg \"kringlet\" problemet.

Tak for hjælpen.

vh
sailor