Seite 1 von 1
Suchergebnis bearbeiten
Verfasst: Mo 31. Mär 2014, 21:59
von tacku
Hallo Office-Community,
ich bin zur Zeit dabei eine Datenbank als Schulprojekt zu erstellen. Ich habe ein Suchfeld in mein Formular angegeben. Wenn ich dort bestimmte Werte eingebe werden mir sämtliche Rezepte dazu in tabellarischer Sicht angezeigt. Soweit funktioniert auch alles.
Mein Problem:
Ich möchte eins dieser Ergebnisse anklicken und dann am besten mit einem Button in einem neuen Formular öffnen. Dort hin sollen alle Daten aus dem vorherigen Datensatz mit übernommen werden, sodass ich diese dann dort bearbeiten kann.
Jedoch fehlen mir die Kenntnisse in der Erstellung von Makros.
Ich würde mich sehr freuen, wenn mir jemand dabei unter die Arme helfen könnte.
Ich bedanke mich schon mal im voraus:)
Re: Suchergebnis bearbeiten
Verfasst: Mo 31. Mär 2014, 22:43
von F3K Total
Hi,
das hatten wir gerade an
dieser Stelle.
HTH R
Re: Suchergebnis bearbeiten
Verfasst: Di 1. Apr 2014, 20:51
von tacku
OK danke,
wenn ich jedoch auf die id in meiner tabelle klicke und dann auf den button erscheint die Meldung:
BASIC-Laufzeitfehler.
Eigenschaften oder Methode nicht gefunden:Mainform.
So sieht das Makro derzeit bei mir aus.
Code: Alles auswählen
sub S_open_Form_Gemueserezepte
oform = thisComponent.drawpage.forms.MainForm
nID = oform.getint(oform.findcolumn("GemüserezeptID"))'ID der zugrundeliegenden Tabelle ausgelesen
oFormDocGemueserezepteErg = ThisDatabasedocument.formdocuments.getbyname("GemueserezepteErg").open'Detailformular öffen
oFormGemueserezepteErg = oFormDocGemueserezepteErg.drawpage.forms.MainForm
oFormGemueserezepteErg.Filter = "(""GemüserezeptID"" = '"+nID+"')"
end sub
Re: Suchergebnis bearbeiten
Verfasst: Di 1. Apr 2014, 20:54
von F3K Total
Na,
dann beschäftige dich mit dem Formularnavigator, um herauszufinden wie dein Formular heißt, oder lade die Datenbank hier hoch, dann können wir mal schauen.
Gruß R
Re: Suchergebnis bearbeiten
Verfasst: Di 1. Apr 2014, 21:05
von tacku
Ok hier ist die Datenbank.
Der aus gewählte Datensatz aus GemüserezepteLow soll in GemueserezepteErg übernommen werden zum bearbeiten.
Re: Suchergebnis bearbeiten
Verfasst: Di 1. Apr 2014, 21:32
von F3K Total
So, du hast ein
Filter - Formular dazwischen eingebaut
- N.png (13.02 KiB) 2582 mal betrachtet
daher muss das Makro so geändert werden:
Code: Alles auswählen
sub S_open_Form_Gemueserezepte
oform = thisComponent.drawpage.forms.Filter.MainForm
nID = oform.getint(oform.findcolumn("GemüserezeptID"))'ID der zugrundeliegenden Tabelle ausgelesen
oFormDocGemueserezepteErg = ThisDatabasedocument.formdocuments.getbyname("GemueserezepteErg").open'Detailformular öffen
oFormGemueserezepteErg = oFormDocGemueserezepteErg.drawpage.forms.MainForm
oFormGemueserezepteErg.Filter = "(""GemüserezeptID"" = '"+nID+"')"
end sub
In der Filter Abfrage1 muss noch
durch
ersetzt werden, sonst werden bei leerem Filterfeld nicht alle Datensätze angezeigt, mit AOO gibt es sogar eine Fehlermeldung.
Ausserdem sollte Schaltfläche1 auf MainForm (siehe Bild oben) verlegt werden, damit nicht immer gefragt wird, ob der Filterdatensatz gespeichert werden soll.
Gruß R
Re: Suchergebnis bearbeiten
Verfasst: Di 1. Apr 2014, 21:48
von tacku
Vielen vielen Dank. Es funktioniert
