Filtern eines Formulars mittels Kombinationsfeld eines anderen Formulars

[tg]

Hallo,
vorab - bitte das angehängte Beispiel downloaden.

Ich möchte folgendes erreichen:
a) Im Startformular wähle ich einen Namen im Kombinationsfeld aus.
b) Anschließend klicke ich auf den Button "Datensatz".
c) Dadurch wird ein anderes Formular geöffnet.
d) In diesem Formular sollen nur die Datensätze angezeigt werden, welche den Namen der Kombinationsfeldauswahl haben.
Das Formular soll also mittels des Kombinationsfeldes gefiltert werden.

Aber wie 

Danke schon mal im voraus und Gruß
Thomas

[Anhang gelöscht durch Administrator]

[Basti123]

Guten morgen,

vielleicht hilft dir das weiter!?

Code [Auswählen] Erweitern

Private Sub Button_Click()
On Error GoTo Err_Button_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = ""anderes Formular"
    stLinkCriteria = "[NamensfeldImAnderenFormular] = " & Me![Kombinationsfeld]
   
    DoCmd.OpenForm stDocName, , , stLinkCriteria
   
Exit_Button_Click:
    Exit Sub

Err_Button_Click:
    MsgBox Err.Description
    Resume Exit_Button_Click

Wenn du mehrere Kombinationsfelder zum Filtern benutzen möchtest würde ich einen Filter nehmen, mit diesem eine temporäre Abfrage erzeugen und diese dann für dein "anderes Formular" nutzen.

Gruß
Basti

[DF6GL]

Hallo,

wenn schon, denn schon:

Code [Auswählen] Erweitern

Private Sub cmdDatensatz_Click()
On Error GoTo Err_cmdDatensatz_Click

    Dim stDocName As String
    Dim stLinkCriteria As String
 
    stLinkCriteria = "Name_ID = " & Me!cmbName
 
    stDocName = "F_Datensatz"
    DoCmd.OpenForm stDocName, acFormDS, , stLinkCriteria

Exit_cmdDatensatz_Click:
    Exit Sub

Err_cmdDatensatz_Click:
    MsgBox Err.Description
    Resume Exit_cmdDatensatz_Click
   
End Sub

[tg]

Hallo nochmal,
besten Dank - es funktioniert!!!

(Nur warum es bei meiner eigentlichen DB noch nicht funktionert weis ich bislang noch nicht )

Gruß
Thomas

[DF6GL]

Hallo,

dann rate ich Dir, das Ganze bzgl. gescheiter und konsistenter Benamsung dringend zu überarbeiten und die Datentypen der Tabellenfelder strikt zu beachten.

[tg]

Hallo,

leider ist das Thema doch noch nicht ganz ausgestanden 

Kann mir jemand sagen warum im angehängten Beispiel die Dreifachfilterung (Filtern mittels der drei Kombinationsfelder)
nicht funktioniert? (Evtl. vor dem Klicken des Buttons "Anzeigen / Eintragen" den Namen auf "aaa" stellen)

Danke und Gruß
Thomas


[Anhang gelöscht durch Administrator]

[DF6GL]

Hallo,

wenn Du für als Referenz auf die Jahrestabelle die "fortlaufende_Nummer_Jahr" benutzt, dann muss auch das Jahr-Kombilistenfeld dieses Tabellenfeld in seiner ersten Spalte aufweisen.

[tg]

Hallo,

ich hab die Geschichte jetzt mit sehr viel Mühe hinbekommen.
(u.A. die ganze ID-Geschichte umgeschrieben...)

Problem gelöst!

Thomas