Progrann Fehler
Iemhoff
Gesendet: 11.03.21 18:54
Betreff: Progrann Fehler


Member

Beiträge: 11

Hallo

Ich habe für einen kleinen Verein ein Adressverwaltung (plus mehr).

In tbl_Alle_Adresen stehen meine HauptDaten.
Hierin möchte ich kein Feld anbringen für Abgang (Austritt, Austritt durch Tot u.s.w) mit z.Bs 0,-1 sondern ein extra
tbl_AlleAdressen_Archief benutzen für Abgänge.

Habe folgendes zusammen gebastelt:
----------------------------------------------------
Private Sub Archief_Click()
On Error GoTo Err_Archief_Click
Dim tbl_Archief As String
tbl_Archief = "tbl_AlleAdressen_Archief"

DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy
DoCmd.OpenTable tbl_Archief
DoCmd.RunCommand acCmdOpenTable, tbl_Archief
DoCmd.RunCommand acCmdRecordsGoToNew
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdPaste
DoCmd.RunCommand acCmdClose

Exit_Archief_Click:
Exit Sub

Err_Archief_Click:
MsgBox Err.Description
Resume Exit_Archief_Click
End Sub
------------------------------------------------

Bekomme eine Fehlermeldung z.BS
Der Befehl oder die Aktion 'Gehe zu neuen Datensatz' steht nicht zu Verfügung. (oder 'Kopieren')

Wo liegt der Fehler???


Top of the page Bottom of the page