Re: Dateingabe für gleiche Datensätze automatisieren
Verfasst: Do, 22.12.2011 21:40
Selber Hallo!
Einen vorgefertigten Befehl zum Kopieren eines Datensatzes kenne ich nicht.
Per Makro ist das aber möglich. Dafür benötigt man mehr Infos über den Aufbau der Datenbank, genauer des betroffenen Formulares und die Spaltentypen der Tabelle.
Am besten ein Beispieldokument hochladen, ggf. verfremdet.
Dann könnte Dir geholfen werden.
Wenn Du
- in der 1. Spalte der Tabelle einen AutoWert-Primäschlüssel hast und
- nur eine Tabelle, ohne Unterformulare, am Formular hängt
geht in vielen Fällen dieses Makro, was man an einen Button "aktuellen Datensatz kopieren" hängt. Das Makro kopiert den aktuell ausgewählten Datensatz ans Ende der Tabelle.
Gruß R
Einen vorgefertigten Befehl zum Kopieren eines Datensatzes kenne ich nicht.
Per Makro ist das aber möglich. Dafür benötigt man mehr Infos über den Aufbau der Datenbank, genauer des betroffenen Formulares und die Spaltentypen der Tabelle.
Am besten ein Beispieldokument hochladen, ggf. verfremdet.
Dann könnte Dir geholfen werden.
Wenn Du
- in der 1. Spalte der Tabelle einen AutoWert-Primäschlüssel hast und
- nur eine Tabelle, ohne Unterformulare, am Formular hängt
geht in vielen Fällen dieses Makro, was man an einen Button "aktuellen Datensatz kopieren" hängt. Das Makro kopiert den aktuell ausgewählten Datensatz ans Ende der Tabelle.
Code: Alles auswählen
Sub S_copy_current_row
oform=thisComponent.drawpage.forms(0)
ocolumns=oform.columns
ncount=ocolumns.count
dim a_Values(ncount) as string
for i=2 to ncount
a_Values(i)=oform.getstring(i)
next i
oform.moveToInsertRow
for i=2 to ncount
oform.updatestring(i,a_Values(i))
next i
oform.insertrow
end sub