Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Eintrag in Listenfeld bei klick an abfrage übergeben?
zurück: Dauer eines Telefongesprächs addieren weiter: Tabelleneintrag ist NULL Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Zamp
Im Profil kannst Du frei den Rang ändern


Verfasst am:
03. Dez 2006, 23:45
Rufname:

Eintrag in Listenfeld bei klick an abfrage übergeben? - Eintrag in Listenfeld bei klick an abfrage übergeben?

Nach oben
       Version: Office XP (2002)

Hallo Leute,

meine Frage heute:
Wie kann ich den Eintrag in einem Listenfeld bei Klick in die WHERE Klausel einer bestehenden SQL Abfrage einfügen und diese Abfrage dann starten?

Beste Wünsche
Zamp
derArb
getting better


Verfasst am:
04. Dez 2006, 06:03
Rufname: derArb
Wohnort: Berlin


AW: Eintrag in Listenfeld bei klick an abfrage übergeben? - AW: Eintrag in Listenfeld bei klick an abfrage übergeben?

Nach oben
       Version: Office XP (2002)

hallo,

vielleicht so?
Code:
    Dim strSql As String
   
    'On Error Resume Next
    strSql = DBEngine(0)(0).OpenRecordset( _
                "SELECT Tabellenfeld " & _
                  "FROM DeineTabelle " & _
                 "WHERE ID = " & Nz(Me!Listenfeld, 0), dbOpenForwardOnly)(0)
    If Err = 0 Then
        Me!Unterformular.Form.RecordSource = strSql
    End If

mfg
derArb

_________________
MfG
derArb

Scio me nihil scire...Εν οίδα οτι ουδέν οίδα... Ich weiss, dass ich nichts weiss (Sokrates)
Ich bevorzuge Beiträge mit korrekter deutscher Grammatik.
Zamp
Im Profil kannst Du frei den Rang ändern


Verfasst am:
05. Dez 2006, 20:50
Rufname:

AW: Eintrag in Listenfeld bei klick an abfrage übergeben? - AW: Eintrag in Listenfeld bei klick an abfrage übergeben?

Nach oben
       Version: Office XP (2002)

Hallo Leute,

entschuldigt meine späte Reaktion. Hatte gestern echt keine zeit vorbei zu schauen.

@derArb
Sofern ich deinen lösungsvorschlag richtig verstehe sollte
ein 2spaltiges Listenfeld benutzt werden dessen Eintragsindex identisch dem Index in der Tabelle ist, richtig?

Die Tabelle die anhand des Listenfeldes ausgelesen werden soll besitzt im Suchfeld wild verteilt verschiedene Gruppen identischer Werte.
Das 1spaltige Listenfeld resultiert aus einer DISTICT Abfrage auf dieses Suchfeld und nimmt nur jeweils einmal den gemeinsamen Wert einer jeden Gruppe auf.

Dieses Listenfeld wollte ich nun benutzen um bei Click eine Abfrage zu starten die nun alle Werte einer Gruppe selektiert.

IDEEN ?

Beste Wünsche
Zamp
derArb
getting better


Verfasst am:
06. Dez 2006, 05:53
Rufname: derArb
Wohnort: Berlin

AW: Eintrag in Listenfeld bei klick an abfrage übergeben? - AW: Eintrag in Listenfeld bei klick an abfrage übergeben?

Nach oben
       Version: Office XP (2002)

hallo Zamp,

wie sieht denn die Tabelle aus? Feldnamen?
und vielleicht gibst Du mal auch den Distinct code hier rein.
Denn ich verstehe Suchfeld und Gruppe nicht.

mfg
derArb

_________________
MfG
derArb

Scio me nihil scire...Εν οίδα οτι ουδέν οίδα... Ich weiss, dass ich nichts weiss (Sokrates)
Ich bevorzuge Beiträge mit korrekter deutscher Grammatik.
Zamp
Im Profil kannst Du frei den Rang ändern


Verfasst am:
06. Dez 2006, 21:00
Rufname:

AW: Eintrag in Listenfeld bei klick an abfrage übergeben? - AW: Eintrag in Listenfeld bei klick an abfrage übergeben?

Nach oben
       Version: Office XP (2002)

Hallo,

stimmt vermutlich drücke ich mich wiedermal viel zu blöde aus.

Also die Tabelle enthält unsortierte Schüler Daten. Die Felder sind S_ID, Nachname, Vorname, Klasse, Geschlecht.
Was ich mit Gruppen meinte sind nur die logischen Gruppen die sich durch die Zugehörigkeit der Schüler zu Klassen ergeben.

Mit der Abfrage
Code:
SELECT DISTINCT
         Klasse
FROM     Schüler
WHERE    Klasse Is Not Null
ORDER BY Klasse;
hole ich mir jede Gruppe = Klasse nur einmal. Und setzte die Textwerte 05A, 05B,.......13A in das (bis jetzt noch)einspaltige Listenfeld.
Das Listenfeld kann ich nun nutzen um in einem einfachen Tabellen-Formular der Tabelle Schüler nachträglich nach einer Klasse zu filtern.

Ich würde das Listenfeld aber gern in einem Hauptformular einsetzen um anhand des gewählten Eintrages bei Click überhaupt erst eine Abfrage für ein Unterformular Schüler zu generieren, dass dann eben nur noch z.B. die DS aller Schüler der Klasse 05A auswirft.

Ist das jetzt irgendwie verständlicher ausgedrückt?

Beste Wünsche
Zamp
derArb
getting better


Verfasst am:
07. Dez 2006, 07:58
Rufname: derArb
Wohnort: Berlin


AW: Eintrag in Listenfeld bei klick an abfrage übergeben? - AW: Eintrag in Listenfeld bei klick an abfrage übergeben?

Nach oben
       Version: Office XP (2002)

hallo,

angenommen, dass ich es richtig verstanden habe, dann willst Du
in einem Hauptformular ein Unterformular und ein Kombinationsfeld.
Das Kombinationsfeld soll als Datenherkunft das Ergebnis der Distinctabfrage anzeigen. Also die Werte des Tabellenfelds 'Klasse' der Tabelle 'Schüler'
Bei Auswahl im Kombinationsfeld sollen im Unterformular alle Schüler der ausgewählten Klasse angezeigt werden.

Hier ein möglicher code für ein Unterformular und eine Listbox

Beim Öffnen des Formulars
Code:
Private Sub Form_Open(Cancel As Integer)
    Dim strSQL  As String
   
    strSQL = "SELECT * " & _
               "FROM Schüler " & _
           "ORDER BY [Vorname] ASC"
    Me!UfoFormular.Form.RecordSource = strSQL
    Me!LstListenfeld.RowSource = strSQL
    Me!cboKlassenAbfrage.RowSource = "AbfrageMitDistinct"
End Sub
Bei Auswahl einer Klasse im Kombinationsfeld 'cboKlassenAbfrage'
Code:
Private Sub cboKlassenabfrage_Click()
    Dim strSQL  As String
   
    strSQL = "SELECT * " & _
               "FROM Schüler " & _
              "WHERE Klasse = '" & Me!cboKlassenAbfrage & "' " & _
           "ORDER BY [Vorname] ASC"
    Me!UfoFormular.Form.RecordSource = strSQL
    Me!LstListenfeld.RowSource = strSQL
End Sub

Um alle wieder auswählen zu können per button 'btnAlleAnzeigen'
Code:
Private Sub btnAlleAnzeigen_Click()
    Dim strSQL  As String
   
    strSQL = "SELECT * " & _
               "FROM Schüler " & _
           "ORDER BY [Vorname] ASC"
    Me!UfoFormular.Form.RecordSource = strSQL
    Me!LstListenfeld.RowSource = strSQL
End Sub
war es das, was Du suchst?

mfg
derArb

_________________
MfG
derArb

Scio me nihil scire...Εν οίδα οτι ουδέν οίδα... Ich weiss, dass ich nichts weiss (Sokrates)
Ich bevorzuge Beiträge mit korrekter deutscher Grammatik.
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: Nummerierung einer Abfrage 6 Prummel 1976 01. März 2004, 17:56
Prummel Nummerierung einer Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: bei Abfrage nur den jüngsten Datensatz anzeigen 3 Hannes 1872 25. Feb 2004, 17:02
Willi Wipp bei Abfrage nur den jüngsten Datensatz anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage Problem 4 shorty 1883 20. Feb 2004, 20:00
shorty Abfrage Problem
Keine neuen Beiträge Access Tabellen & Abfragen: [DANKE-ERLEDIGT] verschachtelte Abfrage 13 ppc 1478 17. Feb 2004, 19:46
ppc [DANKE-ERLEDIGT] verschachtelte Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Formulargesteuerte Abfrage 2 obismarck 2699 17. Feb 2004, 17:03
obismarck Formulargesteuerte Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Min() Abfrage 4 augenzeuge 1056 17. Feb 2004, 10:13
Gast Min() Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage mit Parameter bzgl. Datum ... 3 gunthahari 3489 13. Feb 2004, 18:18
gunthahari Abfrage mit Parameter bzgl. Datum ...
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage aus Formular erstellen 2 frkrone 3248 12. Feb 2004, 14:22
frkrone Abfrage aus Formular erstellen
Keine neuen Beiträge Access Tabellen & Abfragen: inventar abfrage 5 nooby 2254 05. Feb 2004, 14:46
nooby inventar abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Wie kann man über Formular eine Abfrage aufrufen? 2 Ludi 2166 30. Jan 2004, 15:14
Willi Wipp Wie kann man über Formular eine Abfrage aufrufen?
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage 2 Klaus 1957 11. Jan 2004, 22:35
Gast Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Daten aus Formular übernehmen und Abfrage starten 3 quarks 2689 08. Jan 2004, 23:28
reke Daten aus Formular übernehmen und Abfrage starten
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Expression Web