Problem efter ændring af docmd.openreport

feltet id skal også være i formularen idet du jo med Me!id refererer til den aktive formular. Prøv evt. med denne:

DoCmd.OpenReport "til jubilar", acWindowNormal, , "[jubilæumsliste]![id]= '" & Me!Id & "'"

id feltet er i formularen og det er heller ikke det den brokker sig over. Der bliver henvist til jubilæumsliste!id. Jeg har nu prøvet at tilføje id feltet på rapporten og nu får jeg fejl om at datatyperne ikke stemmer overens i kriterieudtrykket

DoCmd.OpenReport "til jubilar", acWindowNormal, , "[jubilæumsliste]![id]= " & Me!Id

ID is very likley a numeric field and should therefore not be in ''

Det er et autonummereringsfelt og det virker nu

Hvordan skal denne sætning se ud med id istedet for [cpr nummer] ?

If Me![Cpr nummer] <> "" Then
        SQLStr = SQLStr & "[cpr nummer] like '*" & Me![Cpr nummer] & "*' And "
    End If

If Me![ID] is a field on a form where you can enter a value then


If Me![ID] <> "" Then

        SQLStr = SQLStr & "[ID] =  " & Me![ID] & " And "

Den bruges til at søge i en kommandoknap som er i en formmular. Førhen søgte den efter cpr nummer og åbnede en anden formular hvor cpr nummer matchede.
Nu vil jeg gerne have den skal gøre det med ID.

Hele sætningen:

Dim SQLStr As String
   
    If Me![Id] <> "" Then
        SQLStr = SQLStr & "[ID] =  " & Me![Id] & " And "
    End If
    If Len(SQLStr) = 0 Then
        DoCmd.OpenForm "jubilæumsliste alle"
        DoCmd.Close acForm, "alle aktive sagsbehandler"
    Else
        SQLStr = Left(SQLStr, Len(SQLStr) - 5)
        DoCmd.OpenForm "jubilæumsliste alle", , , SQLStr
        DoCmd.Close acForm, "alle aktive sagsbehandler"
    End If

Ved denne løsning er den formular der åbnes, blank

me!id er ikke et felt hvor der kan indtastes værdi, id hentes fra tabellen jubilæumsliste

Så vil jeg mene, at du kan bruge denne. Form2 er den nye form du åbner, og feltet id skal være i begge forms:

DoCmd.OpenForm "Form2"
Forms!Form2!id.SetFocus
DoCmd.FindRecord Me!id

Jeg har slettet midterste linie, id felt er skjult på begge formularer, men er der.
Der burde kun komme en record frem i formular 2, men samtlige records kommer

Du skal IKKE slette nogle linier, og id må ikke være skjult da det så ikke kan modtage focus!

23/11-2005 14:21:39 I was originally going to say that we can assume that the ID is always filled out, so you dont need an more than

DoCmd.OpenForm "jubilæumsliste alle", , , "ID = " & Me.ID

Smukt, tak