link fra en formular til en anden

Du kan evt sætte defaultværdien på Aktivitetsid til det samme som på X1. Dette gøre på den knap (eller procedure) hvor du åbner X2:

docmd.Openform "X2",,,"Aktivitetsid = " & Me!Aktivitetsid
Forms!X2!Aktivitetsid.defaultvalue = Me!Aktivitetsid

Derved skulle alle nye poster i X2 få samme aktivitetsid som den bagvedliggende X1

/Thomas

Hej er det samme tabel. Lav en knap til ny post, det kan gøres i begge forms.
Brug gauiden.

Du kunne også bruge eventen Førindsættelse i X2

Private Sub Form_BeforeInsert(Cancel As Integer)
    me![o_revnr]=forms!x1!aktivitetsid
End Sub

Hej Thomas

Koden ser p.t. såldes ud:
    stDocName = "Opfølgning"
    stLinkCriteria = "Opfølgning!o_revnr=forms!aktivitet!aktivitet_id"
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Mener du jeg skal erstatte min DoCmd med det du foreslår?
Tville

Hej Tville,

Du har benyttet guiden til at lave knappen. Derfor ser koden lidt anderledes ud. Men du skal blot tilføje den sidste linie, så koden alt i alt kommer til at se sådan ud (hvis jeg forstår dine navne rigtigt:
    stDocName = "Opfølgning"
    stLinkCriteria = "Opfølgning!o_revnr=forms!aktivitet!aktivitet_id"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    Forms(stDocName)!o_revnr.defaultvalue = Me!aktivitet_id

Umiddelbart vil jeg dog foreslå, at du lige prøver denne først, da den er mere optimal:

    stDocName = "Opfølgning"
    stLinkCriteria = "o_revnr=" & Me!aktivitet_id
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    Forms(stDocName)!o_revnr.defaultvalue = Me!aktivitet_id

Det er jo helt perfekt. Det virker bare.
Tak skal du have.
Tville