Office: (Office 2010) Formular öffnen und zu einem bestimmten Datensatz springen

Hallo *Smilie

wir sollen für unser Schulprojekt eine Datenbank für ein "Sprachinstitute" erstellen. Wir haben hierzu ein Formular Personal in Tabellenform erstellt. Zur Bearbeitung der einzelnen Datensätze wollten wir durch Klicken auf den Datensatz bzw. mit einem Button entsprechenden DS als Einzeldatenblatt öffnen, hierzu müsste beim öffnen direkt zu dem angeklickten Datensatz gesprungen werden. Bislang haben wir unten stehenden Code erstellt, doch leider funktioniert dieser Code nur wenn alle DS vollständig sind und Datensatznr mit ID-Nr. übereinstimmt. Wird allerdings ein Datensatz gelöscht und der Datensatz Nr. 3 hat Bespielsweise nun die ID 4, dann öffnet sich nicht der Datensatz mit der ID 4, wenn ich den Datensatz mit der ID 4 anklicke, sondern Datensatz Nr. 4, der dann die ID 5 beinhaltet. Gibt es hierzu evtl. noch eine Formel die eingefügt werden kann, um dieses Problem zu beheben?

Private Sub cmd_openRecord_Click()
On Error GoTo Err_cmd_openRecord_Click

Dim personal As String
Dim criteria As String
Dim i As Integer
i = Me.id

personal = "frm_personaleinzel2"
DoCmd.OpenForm personal, , , criteria
DoCmd.GoToRecord , , acGoTo, i


Exit_cmd_openRecord_Click:
Exit Sub
Err_cmd_openRecord_Click:
MsgBox Err.Description
Resume Exit_cmd_openRecord_Click

End Sub

Über hilfreiche Antworten wäre ich mehr als dankbar!!

Liebe Grüße
Tina

:)

 

Hallo
und Wilkommen im Forum *hands
kannst Du uns noch verraten was im Feld criteria drin ist ?

noch was wie und wo ein Datensatz (DS) gelöscht wird ?

 

Hallo,
ändere wie folgt:
Code:

Die Variablen (Dim...) sind überflüssig.

 

Hallo,
wie Ruedi schon anmerkte, wird die Variable criteria nicht gefüllt.
Hier dürfte etwas fehlen wie:
Code:

 

Er will doch nicht Filter, sondern zu den Datensatz "gehen", oder?
Dann könnte der code so aussehen:

Anm.: Variablename Personal ungüstig gewählt, eher so was wie FormName...

 

Hallo,

das ist für mich filtern.

 

des wegen mein "oder?", es bezog sich auf post #1.
Tina kann uns sicher mitteil was genau gewünscht ist *Smilie

 

Hallo
wenn keine Antworten von Tina kommen
macht doch das ganze KEINEN spass
wenigstens mir, ich weiss nicht ob es euch auch so geht *wink.gif*

 

Hallo
zu Bookmark
lies in meiner DOC s. Fusszeile unten rechts
seite :142 "6.48 Suchen im Formular und positionieren mit Bookmark"

 

Hallo Leute, schon mal herzlichen Dank für die vielen Antworten! Sorry, bin tagsüber in der Schule und abends arbeiten *frown.gif* deswegen hatte ich noch keine Gelegenheit zu antworten.

@Rudolf, also criteria is bislang nur ne unbeschriebene Variable. Der Datensatz kann mit einem Button aus dem Formular und dann somit auch aus der Ursprungstabelle gelöscht werden.

@gpswanderer die Lösung mit "ID = " & Me.ID hatte ich bereits probiert, nur leider ging das nicht. Da musste ich dann immer den Parameter bestimmen, aber dann hat sich trotzdem nur Datensatz 1 geöffnet und nicht der gewünschte.

@JPA Danke, ich werde deine Lösung noch ausprobieren. Nur leider is es jetzt schon zu spät und ich muss auch mal schlafen *Smilie Werde aber auf alle Fälle noch Rückmeldung geben, ob es geklappt hat oder nicht.

Also generell soll eben der ausgewählte DS nur in einer anderen Ansicht geöffnet werden. Und diese sollte eben direkt erfolgen und nicht durch nochmalige Suche in der Einzelansicht. Also denk ich ist es wohl eine Art Filterung.

Also wie gesagt schon mal herzlichen Dank für die Mühe! Ich werde es morgen nochmals probieren und dann mich wieder bei euch melden *Smilie

Viele Grüße
Tina

 

Hallo,

dann prüfe mal die verwendeten Feldnamen. Die Lösung funktioniert, wenn Du alles richtig anpasst.

 

Irgendwie schein ich unsichtbar zu sein *eek.gif* *biggrin.gif*
Ob du die Filterbedingung als Variable (criteria) verwendest oder den Filterausdruck direkt, wie von Klaus vorgeschlagen, in den OpenForm-Befehl schreibst, ist egal.
Bei der korrekter Benennung sollte es funktionieren.

 

\@gpswanderer: Ich habe nun deine Lösung nochmals ausprobiert, leider habe ich weiter das Problem, dass ich händisch die Parameter eingeben soll und dann springt er trotzdem nicht zum gewünschten DS.
@Marsu65: Sorry, danke auch dir, aber wie bereits gpswanderer mitgeteilt, funktioniert es bei mir nicht *frown.gif*
Vielleicht hab ich auch irgendwo einen Fehler und finde ihn bloß nicht *frown.gif*

@JPA: Bei deiner Lösung stoppt mir VBA bereits bei DAO.Recordset. Ich arbeite mit der Version 2010. Heißt der Befehl hier ggf. anders?

@Lanz Rudolf: Deine "Meine Doc" lässt sich gerade nicht lesbar öffnen, gibt es das auch in PDF-Form?

Vielen Dank + viele Grüße
Tina

 

na das klappt ja prima Tina *grins

Für DAO fehlt wohl einfach der Verweis, gehe also im VBA-Editor auf Extras/Verweise und wähle microsoft DAO 3.6 object Library aus.

Grüße
JPA

 

Hallo

das ist eine PDF in einem Zip-datei
evtl. musst Du die Zip-Datei zuerst runterladen und dann End-Zipen