Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Abfrage mit 2 variablen Kriterien
zurück: 2 Tabellen mit einander Verknüpfen weiter: Funktion Letzter-Wert funktioniert nicht 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
Oli_S
Im Profil kannst Du frei den Rang ändern


Verfasst am:
10. Feb 2006, 17:58
Rufname:
Wohnort: München

Abfrage mit 2 variablen Kriterien - Abfrage mit 2 variablen Kriterien

Nach oben
       

Hallo zusammen,

viell. kann mir jemand von Euch helfen. Habe folgendes Problem:
will eine Abfrage mit 2 VARIABLEN Kriterien erstellen, die sich aus dem Kontext ergeben und NICHT vom Benutzer als Parameter eingegeben werden sollen. Ungefähr so, nur eben ohne Parameter-Box:
Code:
    ausdruck1 = "Spezial"    'die 2 Kontext-Variablen, NICHT fix
    ausdruck2 = "*E81*"
    With sqlcmd
        .CommandText = "SELECT Tabelle_Bauteile.BT_IdentNr, " & _
                              "Tabelle_Bauteile.FS_BH_IdentNr, " & _
                              "Tabelle_Behälter.BH_Name, " & _
                              "Tabelle_Behälter.BH_Typ, " & _
                              "Tabelle_Bauteile.Fahrzeug_Typ " & _
                         "FROM Tabelle_Behälter " & _
                              "INNER JOIN Tabelle_Bauteile " & _
                              "ON Tabelle_Behälter.BH_IdentNr = " & _
                                         "Tabelle_Bauteile.FS_BH_IdentNr " & _
                        "WHERE Tabelle_Behälter.BH_Typ=ausdruck1 " & _
                          "AND Tabelle_Bauteile.Fahrzeug_Typ Like " & _
                                             "ausdruck2" 'so kommen 2 Abfragen
                       '"WHERE Tabelle_Behälter.BH_Typ='Spezial' " & _
                          "AND Tabelle_Bauteile.Fahrzeug_Typ Like '*E81*'"
                                             'so gehts aber Kriterien sind fix
    End With
Oder noch besser: die variablen Kriterien in eine bestehende Abfrage einlesen, aber WIE???
accessmichel
Im Profil kannst Du frei den Rang ändern


Verfasst am:
10. Feb 2006, 18:56
Rufname:


AW: Abfrage mit 2 variablen Kriterien - AW: Abfrage mit 2 variablen Kriterien

Nach oben
       

Hallo Oli,
schau mal Anfängerfrage zur Variablengültigkeit

mfg
Thomas

_________________
mfg
Thomas

Access 2003/XP
Gast



Verfasst am:
11. Feb 2006, 12:17
Rufname:

AW: Abfrage mit 2 variablen Kriterien - AW: Abfrage mit 2 variablen Kriterien

Nach oben
       

Gast am 10. Feb 2006 um 19:00 hat folgendes geschrieben:
Hallo Thomas,

vielen Dank, das war ein super Tip Very Happy
was man mit Funktionen doch alles machen kann...

Ich bau den Code jetzt dem entsprechend um und stell ihn dann hier ins Forum (falls gewünscht)

Gruss, Oli

Hallo Thomas,

vielen Dank noch mal. Hat super geklappt. Hier ist der Code:

2 mal Funktion:
Code:
Option Compare Database
Global ausdruck1 As String

Public Function Kriterium1_festlegen()
    Kriterium1_festlegen = ausdruck1
End Function

' und festlegen, aufrufen:
Sub test()
    '...
    ausdruck1 = X
    ausdruck2 = y
    With sqlcmd
        .CommandText = "SELECT Tabelle_Bauteile.BT_IdentNr, " & _
                              "Tabelle_Bauteile.FS_BH_IdentNr, " & _
                              "Tabelle_Behälter.BH_Name, " & _
                              "Tabelle_Behälter.BH_Typ, " & _
                              "Tabelle_Bauteile.Fahrzeug_Typ " & _
                         "FROM Tabelle_Behälter " & _
                              "INNER JOIN Tabelle_Bauteile " & _
                              "ON Tabelle_Behälter.BH_IdentNr = " & _
                                         "Tabelle_Bauteile.FS_BH_IdentNr " & _
                        "WHERE Tabelle_Behälter.BH_Typ = " & _
                                                 "Kriterium1_festlegen() " & _
                          "AND Tabelle_Bauteile.Fahrzeug_Typ Like " & _
                              "                        Kriterium2_festlegen()"
    End With
    catalog.Procedures.Append abf, sqlcmd
    Application.RefreshDatabaseWindow
    '...
End Sub
Willi Wipp
Moderator


Verfasst am:
13. Feb 2006, 12:18
Rufname:
Wohnort: Raum Wiesbaden


Re: Abfrage mit 2 variablen Kriterien - Re: Abfrage mit 2 variablen Kriterien

Nach oben
       

Hi Oli_S,

oder auch einfach
Code:
Sub test()
    '...
    ausdruck1 = X
    ausdruck2 = y
    With sqlcmd
        .CommandText = "SELECT Tabelle_Bauteile.BT_IdentNr, " & _
                              "Tabelle_Bauteile.FS_BH_IdentNr, " & _
                              "Tabelle_Behälter.BH_Name, " & _
                              "Tabelle_Behälter.BH_Typ, " & _
                              "Tabelle_Bauteile.Fahrzeug_Typ " & _
                         "FROM Tabelle_Behälter " & _
                              "INNER JOIN Tabelle_Bauteile " & _
                              "ON Tabelle_Behälter.BH_IdentNr = " & _
                                         "Tabelle_Bauteile.FS_BH_IdentNr " & _
                        "WHERE Tabelle_Behälter.BH_Typ = " & ausdruck2 & _
                          "AND Tabelle_Bauteile.Fahrzeug_Typ Like '" & _
                                                               ausdruck2 & "'"
    End With
    catalog.Procedures.Append abf, sqlcmd
    Application.RefreshDatabaseWindow
    '...
End Sub

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
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: Kombinationsfeld im Formular als Kriterium für eine Abfrage 1 gunderma 2621 03. März 2004, 10:05
tania63 Kombinationsfeld im Formular als Kriterium für eine Abfrage
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 mit Auswahlkriterium über 2 Tabellen 1 Majo 1907 24. Feb 2004, 13:54
Willi Wipp Abfrage mit Auswahlkriterium über 2 Tabellen
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: Min() Abfrage 4 augenzeuge 1056 17. Feb 2004, 10:13
Gast Min() Abfrage
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: Inhalt einer Abfrage überschreiben? 1 Esdo 1247 13. Jan 2004, 12:35
Bernd Schenkel Inhalt einer Abfrage überschreiben?
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: Parameter abfrage 3 Gast 1903 01. Dez 2003, 16:12
Caladan Parameter abfrage
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel-Formeln