Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Filterung vom Unterformular ins bzw. an Hauptformular
zurück: Im Unterformular springt Cursor immer in erste Zeile weiter: Ereignisproz. für Registerelement Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
etienne
Im Profil kannst Du frei den Rang ändern


Verfasst am:
07. Apr 2011, 22:31
Rufname:
Wohnort: Frauenfeld

Filterung vom Unterformular ins bzw. an Hauptformular - Filterung vom Unterformular ins bzw. an Hauptformular

Nach oben
       Version: Office 2007

etienne am 07. Apr 2011 um 21:11 hat folgendes geschrieben:
Hallo zusammen

Ich habe in einer Datenbank das Formular Schüssler_Haupttabelle.

In diesem Formular habe ich das Unterformular Schüssler_Haupttabelle_Schüssler_Indikationen.

Ich möchte nun, dass wenn ich einen Begriff aus dem Unterformular Schüssler_Haupttabelle_Schüssler_Indikationen in das Kombinationsfeld Indiktion eingebe, alle Artikel aus der Tabelle schüssler_haupttabelle im Formular schüssler_Haupttabelle angezeigt werden, welche eine entsprechende Verknüpfung aufweisen zur Tabelle Schüssler_Indikation aufweisen.
Versucht habe ich es mit
Code:
    Dim strSQL  As String
   
    strSQL = "SELECT *" _
            & " FROM schüssler_indikation"
    If Not IsNull(Me![Indikationssuche]) Then
        strSQL = strSQL _
           & " WHERE ID IN (SELECT id" _
                     & " FROM Schüssler_Haupttabelle_Schüssler_Indikationen" _
                         & " WHERE indikation = '" _
                                               & " Me!Indikationssuche & " ')"
    End If
    Me.RecordSource = strSQL
End Sub
Ich bekomme den
Zitat:
Laufzeitfehler 3075: Syntaxfehler in Zeichenfolge
Tabellenaufbau:
Tabelle Primärschlüssel
Schüssler_Haupttabelle ID
schüssler_Indikation Id_schüssler_indikation
Schüssler_Haupttabelle_Schüssler_Indikationen Id

Könnt Ihr mir bitte helfen, dass Problem zu lösen?
Für Eure Bemühungen danke ich Euch im Voraus.

mfg
etienne

zum bessren Verständnis habe ich die DB hochgeladen.
mfg
etienne



Schüssler_Salze.zip
 Beschreibung:

Download
 Dateiname:  Schüssler_Salze.zip
 Dateigröße:  45.76 KB
 Heruntergeladen:  11 mal

MissPh!
Office-VBA-Programmiererin


Verfasst am:
08. Apr 2011, 00:00
Rufname:
Wohnort: NRW


AW: Filterung vom Unterformular ins bzw. an Hauptformular - AW: Filterung vom Unterformular ins bzw. an Hauptformular

Nach oben
       Version: Office 2007

Hallo,

abgesehen von Syntaxfehlern in der Where-Klausel
Zitat:
& " WHERE indikation = '" & " Me!Indikationssuche & "_')"
gibt es kein Datenfeld namens ID in der Tabelle "schüssler_indikation".
_________________
Gruß MissPh!
etienne
Im Profil kannst Du frei den Rang ändern


Verfasst am:
08. Apr 2011, 08:45
Rufname:
Wohnort: Frauenfeld

AW: Filterung vom Unterformular ins bzw. an Hauptformular - AW: Filterung vom Unterformular ins bzw. an Hauptformular

Nach oben
       Version: Office 2007

Hallo Miss Ph!
Vielen Dank für Deine Rückmeldung.
Aber ich drehe mich mal wieder im Kreis.
Beim Code:
Code:
    Dim strSQL  As String
   
    strSQL = "SELECT *" _
            & " FROM schüssler_indikation"
    If Not IsNull(Me![Indikationssuche]) Then
        strSQL = strSQL _
           & " WHERE Id_schüssler_Indikation" _
                 & " In (SELECT ID_Schüssler_Indikation" _
                       & " FROM Schüssler_Indikationen" _
                      & " WHERE indikation = '" & " Me!Indikationssuche & " )"
    End If
    Me.RecordSource = strSQL
gibt es wieder Syntaxfehler. Bei:
Code:
                      & " WHERE indikation = '" & " Me!Indikationssuche & "_')"
gibt es die Meldung, dass die Anweisung nicht komplett ist und _ ein ungültiges Zeichen ist.
Kannst Du mir bitte weiterhelfen?
Vielen Dank für Deine Bemühungen.
mfg
Etienne
MissPh!
Office-VBA-Programmiererin


Verfasst am:
08. Apr 2011, 10:16
Rufname:
Wohnort: NRW

AW: Filterung vom Unterformular ins bzw. an Hauptformular - AW: Filterung vom Unterformular ins bzw. an Hauptformular

Nach oben
       Version: Office 2007

Hallo.

Ich hatte dir doch oben schon das falsch platzierte Gänsefüßchen rot markiert und der rote Unterstrich sollte nur das ebenfalls falsch platzierte Leerzeichen markieren.

So könnte es gehen:
Code:
                         & " WHERE indikation = '" & Me!Indikationssuche & "')"

Nachtrag: MissPh! am 08. Apr 2011 um 10:32 hat folgendes geschrieben:
Nachtrag:
Ich habe mir jetzt deine DB noch einmal genauer angeschaut, so macht das keinen Sinn mit der Abfrage. Der Code steht im Hauptformular, das ist aber an die Tabelle "Schüssler_Haupttabelle" gebunden. Dem kannst du also nicht einfach eine andere Datenherkunft aus einer anderen Tabelle zuweisen.
Beschreibe doch erstmal, was du überhaupt tun willst.

BTW: Du solltest dir dringend andere Namenskonventionen aneignen. Die langen Tabellen- und Datenfeldnamen verhindern u.a. die Einrichtung der Referentiellen Integrität bei den Tabellenbeziehungen, die aber unverzichtbar ist für ein gesundes Tabellenkonzept.

_________________
Gruß MissPh!
etienne
Im Profil kannst Du frei den Rang ändern


Verfasst am:
08. Apr 2011, 11:42
Rufname:
Wohnort: Frauenfeld


AW: Filterung vom Unterformular ins bzw. an Hauptformular - AW: Filterung vom Unterformular ins bzw. an Hauptformular

Nach oben
       Version: Office 2007

Hallo MissPH
Im Hauptformular_Schüssler_salze gibt es u.a das Unterformular Schüssler_Haupttabelle_Schüssler_Indiktion. In diesem Formular werden dem Eintrag / Datensatz im / vom Formular: Schüssler_Haupttabelle diverse Indikationen zu geordnet.

Ziel ist: Wenn mit einem Begriff aus dem Unterformular Schüssler_Haupttabelle_Schüssler_Indiktion ; Feld: Indiktion gesucht wird, im Hauptformular alle Datensätze bzw. Artikel angezeigt werden, wo der entsprechende Begriff zu geordnet ist.

Über den Formularbasiertenfilter klappt dies nicht. Es werden auch solche Datensätze angezeigt, welche keine Verknüpfung zu den Artikeln haben.

Wie lässt sich diese Filterung bewerkstelligen?
Vielen Dank für Deine Bemühungen und Einsatz
Gruss
Etienne
MissPh!
Office-VBA-Programmiererin


Verfasst am:
08. Apr 2011, 12:30
Rufname:
Wohnort: NRW

AW: Filterung vom Unterformular ins bzw. an Hauptformular - AW: Filterung vom Unterformular ins bzw. an Hauptformular

Nach oben
       Version: Office 2007

Hi,

du brauchst eine Abfrage, die dir aus den Tabellen "Schüssler_Indikation" und "Schüssler_Haupttabelle_Schüssler_Indikationen" die ID für die Haupttabelle liefert.
Das sähe dann folgendermaßen aus:
Code:
Private Sub Indikationssuche_AfterUpdate()
    Dim strSQL  As String
   
    strSQL = "SELECT * FROM schüssler_Haupttabelle "
    If Not IsNull(Me![Indikationssuche]) Then
        strSQL = strSQL _
            & "WHERE ID In (SELECT HI.Hautpttabelle_Artikel" _
                          & " FROM Schüssler_Indikation AS I" _
                               & " INNER JOIN Schüssler_Haupttabelle_Schüssler_Indikationen AS HI" _
                               & " ON I.ID_Schüssler_Indikation = HI.Indikation" _
                         & " WHERE I.Indikation='" & Me!Indikationssuche & "'"
    End If
    Me.RecordSource = strSQL
End Sub
Und noch einmal die dringende Bitte, dich von deinen langen Objektbezeichnungen zu trennen.

{12:45 Code korrigiert}

_________________
Gruß MissPh!
etienne
Im Profil kannst Du frei den Rang ändern


Verfasst am:
08. Apr 2011, 13:39
Rufname:
Wohnort: Frauenfeld

AW: Filterung vom Unterformular ins bzw. an Hauptformular - AW: Filterung vom Unterformular ins bzw. an Hauptformular

Nach oben
       Version: Office 2007

Hallo MissPh!

Ich bin begeistert!
Ich habe den Code in ein Textfeld gelegt nicht mir in Kombinationsfeld.
Vielen Dank.
Ja ich werde künfitig kürzer Namen verwenden.
Eine Fragen wie kann es machen, dass auch mit * gesucht wird. z.B. Fieb*

Für Deine Hilfe und Rückmeldung danke ich Dir im Voraus.
Gruss
Etienne
MissPh!
Office-VBA-Programmiererin


Verfasst am:
08. Apr 2011, 13:59
Rufname:
Wohnort: NRW

AW: Filterung vom Unterformular ins bzw. an Hauptformular - AW: Filterung vom Unterformular ins bzw. an Hauptformular

Nach oben
       Version: Office 2007

Hi,

wenn du den Stern selbst mit eingeben willst, brauchst du nur das Gleichheitszeichen durch LIKE zu ersetzen.

_________________
Gruß MissPh!
etienne
Im Profil kannst Du frei den Rang ändern


Verfasst am:
10. Apr 2011, 17:17
Rufname:
Wohnort: Frauenfeld


AW: Filterung vom Unterformular ins bzw. an Hauptformular - AW: Filterung vom Unterformular ins bzw. an Hauptformular

Nach oben
       Version: Office 2007

Vielen Dank.
So klappt es:
Code:
                         & " WHERE I.Indikation Like '" & Me!Text92 & "'"

Gruss
Etienne
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Problem mit Beziehung bzw. mit Suchen_frm 1 --=Franky=-- 503 15. März 2007, 07:55
--=Franky=-- Problem mit Beziehung bzw. mit Suchen_frm
Keine neuen Beiträge Access Tabellen & Abfragen: Top 100 bzw. Top 80 aus einer Abfrage auswählen, wie? 4 Markus_l 1615 20. Jan 2007, 14:53
Willi Wipp Top 100 bzw. Top 80 aus einer Abfrage auswählen, wie?
Keine neuen Beiträge Access Tabellen & Abfragen: Menge vom Datensatz abziehen 1 DKoch 793 29. Nov 2006, 22:18
stpimi Menge vom Datensatz abziehen
Keine neuen Beiträge Access Tabellen & Abfragen: Tabelle bzw Abfrage neu nummerieren? A03 4 Gast 1003 19. Jul 2006, 11:03
Willi Wipp Tabelle bzw Abfrage neu nummerieren? A03
Keine neuen Beiträge Access Tabellen & Abfragen: Einzelne Datensätze ins Outlook Adressbuch 0 Pando0ora 706 01. Jun 2006, 09:07
Pando0ora Einzelne Datensätze ins Outlook Adressbuch
Keine neuen Beiträge Access Tabellen & Abfragen: Problem: Parameter-Abfrage aus einem Unterformular ausführen 3 bettina_vt 3427 12. Mai 2006, 15:44
bettina_vt Problem: Parameter-Abfrage aus einem Unterformular ausführen
Keine neuen Beiträge Access Tabellen & Abfragen: vom Format Currency das Währungssymbol entfernen 4 china 1495 12. Apr 2006, 07:51
steffen0815 vom Format Currency das Währungssymbol entfernen
Keine neuen Beiträge Access Tabellen & Abfragen: Wie kann ich Daten laden vom nächsten recordset ohne 1 MatthiasDD 696 03. Nov 2005, 10:21
rita2008 Wie kann ich Daten laden vom nächsten recordset ohne
Keine neuen Beiträge Access Tabellen & Abfragen: wie"x*" bzw x* 6 Neuling123 584 22. Sep 2005, 18:45
Gast wie"x*" bzw x*
Keine neuen Beiträge Access Tabellen & Abfragen: Tabellen erweitern und aktualisieren, bzw. zusammenführen 1 Sharon060370 801 16. Aug 2005, 10:34
lothi Tabellen erweitern und aktualisieren, bzw. zusammenführen
Keine neuen Beiträge Access Tabellen & Abfragen: problem mit einer abfrage bzw tabelle 3 dragonfly 599 04. Aug 2005, 11:51
Dalmatinchen problem mit einer abfrage bzw tabelle
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage mit vom Anwenderdefinierten Suchkriterium 0 Michael_L 499 11. Jul 2005, 09:20
Michael_L Abfrage mit vom Anwenderdefinierten Suchkriterium
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: PHP JavaScript