Daten von einem UFO in ein anderes kopieren

markusp , Montag, 28. Dezember 2009, 18:58 @ Martin Asal

Hallo Martin,

vorerst besten Dank für deine Antwort. Habe VBA so angelegt:

Private Sub Uebernehmen_Click()
Dim RS As DAO.Recordset
Me!Forms!frmHBAdressen.HBNAM = Me!Forms!frmPar13LTGListe.Nam
RS.AddNew
RS.Update
RS.Close
Forms![frmPar13LTGListe].Requery
End Sub

Es kommt leider die Fehlermeldung ".. kann das in ihrem Ausdruck angesprochene Feld 'Forms' nicht finden"
Habe alles überprüft und kann mir die Fehlermeldung nicht erklären.

Gruß Markus