Neuigkeiten:

Ist euer Problem gelöst, dann bitte den Knopf "Thema gelöst" drücken!

Mobiles Hauptmenü

mit Button bestimmten Datensatz anzeigen

Begonnen von Optiplex, September 07, 2012, 18:51:02

⏪ vorheriges - nächstes ⏩

Optiplex

hallo zusammen,
ich möchte mit einem Button zu einem bestimmten Datensatz im Unterformular sprichen und diesen anzeigen. Scheinbar steht ich hier heute richtig auf dem Schlauch. Kann ir da jemand weiterhelfen?

Gruß Dieter

Beaker s.a.

Hallo Dieter,
Wodurch wird der Datensatz den bestimmt ?
Wenn die ID bekannt ist kann man es so machen (Luftcode):
Private Sub DeinButton_Click()
    Dim rst As Dao.Recordset

    set rst = Me.Controls("NameDesUFoControls").Form.RecordsetClone

    rst.FindFirst "TabellenFeldMitID = " & Me.Controls("FeldMitID").Value
    Me.Controls("NameDesUFoControls").Form.Bookmark = rst.Bookmark

    rst.Close
    Set rst = Nothing
End Sub

hth
gruss ekkehard
Alles, was geschieht, geschieht. - Alles, was während seines Geschehens etwas anderes geschehen lässt, lässt etwas anderes geschehen. - Alles, was sich selbst im Zuge seines Geschehens erneut geschehen lässt, geschieht erneut. - Allerdings tut es das nicht unbedingt in chronologischer Reihenfolge.
(Douglas Adams, Mostly Harmless)

Optiplex

Hallo Ekkehard,
Danke dein Luftcode hat mir auf die Sprünge geholfen. Hat nun wunderbar geklappt. Von die kann man code übernehmen, sogar ans aufräumen des Recordset hast du gedacht.

Danke und Gruß
Dieter

anita

Hallo Leute,
Ich bin ein Access Anfängerin und habe wirklich ein verrückt machendes Problem hier.ich versuche s zu erklären:

Also, ich habe ein Formular, darauf es sich viele Steuerelemente befindet. gestern habe ich extra einen "Spring zu dem Datensatz" combobox hinzugefügt, der "cmbSpring" heißt und funktioniert gut. Aber
Wenn ich einen anderen Combox,der "Zähler heißt" anklicke und anschließend "cmbSpring" anklicke kommt der Fehler 3022 und wenn ich debugge sehe ich in der folgenden Code "Me.Bookmark = rs.Bookmark" in gelb. Warum überhaupt, was ist da falsch?

Profis, bitte helft!

Mein Code für den Berecih ist:

Private Sub cmbSpring_AfterUpdate()
' Den mit dem Steuerelement übereinstimmenden Datensatz suchen.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[Zähler] = " & str(Nz(Me![cmbSpring], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub


Danke im Voraus

Anita

MzKlMu

#4
Hallo,
Kombis zum Suchen müssen ungebunden sein.

Einen entsprechenden Hinweis hast Du auch im  im anderen Forum bekommen.

http://www.office-loesung.de/ftopic548649_0_0_asc.php
Gruß Klaus

oma

Hallo Anita,  

und warum machst du nicht eine neue Frage auf statt dich an einer gelösten anzuhängen?

Gruß Oma

PS. Habe Hinweis von Klaus nicht gelesen
nichts ist fertig!