Neuer Datensatz über Makro Formular einfügen
Verfasst: Mi 27. Apr 2016, 17:06
Ich versuche über einen Button ein neues Formular zu öffnen und einen neuen Datensatz einzufügen.
Öffnen geht, aber Datensatz anlegen nicht. Hab schon zig Varianten probiert, mit insertrow und movetoinsertrow. Aber mein syntax stimmt einfach nicht.
Sub newItem
const sNewDocumentName="Lagerverwaltung.Artikel"
const parentDoc="Lagerverwaltung.StammdatenListe"
Dim oForm as object
Dim oDrawPage as object
oNewFormDocument=ThisDatabaseDocument.FormDocuments.getbyName(parentDoc).close 'schließt Formular
oNewFormDocument=ThisDatabaseDocument.FormDocuments.getbyName(sNewDocumentName).open 'öffnet neues Formular
oDrawPage = ThisComponent.getDrawPage()
oForm = oDrawPage.getForms()
oForm.insertRow ' soll neuen Datensatz hinzufügen
End Sub
Danke.
Öffnen geht, aber Datensatz anlegen nicht. Hab schon zig Varianten probiert, mit insertrow und movetoinsertrow. Aber mein syntax stimmt einfach nicht.
Sub newItem
const sNewDocumentName="Lagerverwaltung.Artikel"
const parentDoc="Lagerverwaltung.StammdatenListe"
Dim oForm as object
Dim oDrawPage as object
oNewFormDocument=ThisDatabaseDocument.FormDocuments.getbyName(parentDoc).close 'schließt Formular
oNewFormDocument=ThisDatabaseDocument.FormDocuments.getbyName(sNewDocumentName).open 'öffnet neues Formular
oDrawPage = ThisComponent.getDrawPage()
oForm = oDrawPage.getForms()
oForm.insertRow ' soll neuen Datensatz hinzufügen
End Sub
Danke.