kopieren lukt niet

Status
Niet open voor verdere reacties.

JEPEDEWE

Terugkerende gebruiker
Lid geworden
14 jun 2006
Berichten
1.682
Hallo
Code:
        Select Case Me.cbb_SoortDocument
            Case 1
                Me.Txt_correspondentie = Me!Txt_kode & "_CMUT_" & Format(Me.Dt_Wegschrijfdatum, "ddmmyy")
            Case 2
                Me.Txt_correspondentie = Me!Txt_kode & "_FMUT_" & Format(Me.Dt_Wegschrijfdatum, "ddmmyy")
            Case 3
                Me.Txt_correspondentie = Me!Txt_kode & "_EMUT_" & Format(Me.Dt_Wegschrijfdatum, "ddmmyy")
        End Select
        DoCmd.RunCommand acCmdCopy

Op de lijn: DoCmd.RunCommand acCmdCopy krijg ik volgende foutmelding:

Fout 2046 tijdens uitvoering:
De opdracht of actie Kopieren is momenteel niet beschikbaar

het is de bedoeling dat me.txt_correspondentie in het tijdelijk geheugen terecht komt
Op de andere plaatsen in het project krijg ik nooit die foutmelding... raar :confused::(
 
Ik snap niet wat je wilt kopieëren, want je geeft de rest van de code niet. Misschien moet je het record eerst opslaan.
 
Je moet eerst de focus op je formulierveld zetten:

Code:
Select Case Me.cbb_SoortDocument
            Case 1
                Me.Txt_correspondentie = Me!Txt_kode & "_CMUT_" & Format(Me.Dt_Wegschrijfdatum, "ddmmyy")
            Case 2
                Me.Txt_correspondentie = Me!Txt_kode & "_FMUT_" & Format(Me.Dt_Wegschrijfdatum, "ddmmyy")
            Case 3
                Me.Txt_correspondentie = Me!Txt_kode & "_EMUT_" & Format(Me.Dt_Wegschrijfdatum, "ddmmyy")
End Select
[B][COLOR="#FF0000"]Me.Txt_correspondentie.SetFocus[/COLOR][/B]
DoCmd.RunCommand acCmdCopy

Tardis
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan