Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Bericht mit Checkbox und Textfeld filtern
zurück: Filter per Unterformular weiter: Datenauswahl im Formular 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
bobmalaria
Von allem ein bisschen Ahnung, kein Experte


Verfasst am:
09. Okt 2006, 22:28
Rufname:

Bericht mit Checkbox und Textfeld filtern - Bericht mit Checkbox und Textfeld filtern

Nach oben
       Version: Office 2003

moin moin,

ich habe eine formular in dem ich, wenn die Spalte "type" den wert "P" hat, einen gefilterten Bericht erhalte. Das Filtern funktioniert ueber ein Textfeld in das das Filterkriterium eingetragen wird (wie hier z.b. "P").
Das gleiche habe ich auch fuer die Spalte "Action"

mit hilfe einer Checkbox lassen sich die beiden kriterien kombinieren:
Code:
    If Me!Check64 = True Then
        Me.Filter = "[Type]='" & Me![withPO] & "' " & _
                "AND [Action]='" & Me![withAction] & "'"
jetzt moechte ich den filter um 7 Checkboxen erweitern.
Wenn Checkbox = True dann soll ein fest hinterlegter wert ebenfalls einen bericht filter ergeben.

mein problem ist das ich in der filteranweisung strings uebergebe. jeder meiner versuche ist bisher daran gescheitert, da ich in die anweisung keinen wert rein bekomme.

sowas hatte ich veruscht:
Code:
    Me.Filter = "[Action]='" & Me![without] & "'" 'and checkboxfilter1 and usw.
hat leider nicht geklappt.

weitere probleme sind, dass wenn ich die checkbox deaktiviert habe auch der filter deaktiviert werden muss. wenn der filter naemlich "" enthaelt bekomme ich einen leeren bericht

Wie kann ich ausserdem die checkboxen miteinander kombinieren?

zur veranschaulichung noch dieser screenshot:


idealerweise sollten die checkboxkriterien fuer einzel und fuer kombinierte suche funktionieren.

ich hoffe ihr versteht was ich meine/ moechte.

wenn nicht bitte rueckfragen stellen!!!!!

gruss
jens05
Moderator


Verfasst am:
10. Okt 2006, 06:32
Rufname:
Wohnort: ~~~~~


AW: Bericht mit Checkbox und Textfeld filtern - AW: Bericht mit Checkbox und Textfeld filtern

Nach oben
       Version: Office 2003

Hallo,
folgende Filterzusammensetzung ist ungetestet, sollte aber gehen.
Code:
    Me.Filter = "[Action]='" & Me![without] & "'" & _
                IIf(Me!CheckboxIR, " AND [BLABLA]='blub'", Null) & _
                IIf(Me!CheckboxAR, " AND [BLUBLA]=327", Null) ' & ...

_________________
mfg jens05 Wink
Willi Wipp
Moderator


Verfasst am:
10. Okt 2006, 09:17
Rufname:
Wohnort: Raum Wiesbaden

Re: Bericht mit Checkbox und Textfeld filtern - Re: Bericht mit Checkbox und Textfeld filtern

Nach oben
       Version: Office 2003

Hi bobmalaria,

wenn Du es noch komplexer haben moechtest, gibt es da auch noch das Thema Suchformular in 10 Minuten erstellt

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
bobmalaria
Von allem ein bisschen Ahnung, kein Experte


Verfasst am:
10. Okt 2006, 21:01
Rufname:

AW: Bericht mit Checkbox und Textfeld filtern - AW: Bericht mit Checkbox und Textfeld filtern

Nach oben
       Version: Office 2003

bobmalaria am 10. Okt 2006 um 14:21 hat folgendes geschrieben:
danke schon mal,

die idee aus der ersten antwort werde ich gleich mal ausprobieren

das suchformular habe ich mir schon mal angeschaut.
leider verstehe ich nicht alles was da passiert und deshalb lasse ich lieber die finger davon. Rolling Eyes

gruss

es funktioniert nach obigem post ganz ordentlich.

nur kann ich nicht zwei argumente auswaehlen (bei den checkboxen), mit einem funktioniert es sehr gut.
jens05
Moderator


Verfasst am:
10. Okt 2006, 21:06
Rufname:
Wohnort: ~~~~~


AW: Bericht mit Checkbox und Textfeld filtern - AW: Bericht mit Checkbox und Textfeld filtern

Nach oben
       Version: Office 2003

Hallo,
wieso kannst du nicht? Kommt eine Fehlermeldung? Wie sieht dein Code aus?

_________________
mfg jens05 Wink
bobmalaria
Von allem ein bisschen Ahnung, kein Experte


Verfasst am:
12. Okt 2006, 16:52
Rufname:

AW: Bericht mit Checkbox und Textfeld filtern - AW: Bericht mit Checkbox und Textfeld filtern

Nach oben
       Version: Office 2003

also einen fehler habe ich nicht. wenn ich zwei checkboxen aktiviere dann bekomme ich einen leeren Bericht. ich habe auch die AND schon mal mit OR ersetzt. irgendwo habe ich gelesen,dass man Or nehem n muss um in einer spalte nach zwei dingen zu suchen
Code:
    If Me!Check64 Then
        Me.Filter = "[Type]='" & Me![withPO] & _
                     "' AND [Action]='" & Me![without] & "' " & _
            IIf(Me!IR, "AND [Status]='IR'", Null) & _
             IIf(Me!AR, "OR [Status]='AR'", Null) & _
              IIf(Me!A, "OR [Status]='A'", Null) & _
             IIf(Me!CF, "OR [Status]='CF'", Null) & _
             IIf(Me!CW, "OR [Status]='CW'", Null) & _
            IIf(Me!CWR, "OR [Status]='CWR'", Null) & _
              IIf(Me!o, "OR [Status]='O'", Null)
      Else
        Me.Filter = "[Type]='" & Me![withPO] & "' " & _
            IIf(Me!IR, "AND [Status]='IR'", Null) & _
             IIf(Me!AR, "OR [Status]='AR'", Null) & _
              IIf(Me!A, "OR [Status]='A'", Null) & _
             IIf(Me!CF, "OR [Status]='CF'", Null) & _
             IIf(Me!CW, "OR [Status]='CW'", Null) & _
            IIf(Me!CWR, "OR [Status]='CWR'", Null) & _
              IIf(Me!o, "OR [Status]='O'", Null)
    End If
kannst du einen fehler entdecken?
Willi Wipp
Moderator


Verfasst am:
12. Okt 2006, 17:21
Rufname:
Wohnort: Raum Wiesbaden

Re: Bericht mit Checkbox und Textfeld filtern (II) - Re: Bericht mit Checkbox und Textfeld filtern (II)

Nach oben
       Version: Office 2003

Hi bobmalaria,

und warum nicht gleich so
Code:
    Me.Filter = "[Type]='" & Me![withPO] & "' " & _
        IIf(Me!Check64, "AND [Action]='" & Me![without] & "' ") & _
             IIf(Me!IR, "AND [Status]='IR' ", Null) & _
              IIf(Me!AR, "OR [Status]='AR' ", Null) & _
               IIf(Me!A, "OR [Status]='A' ", Null) & _
              IIf(Me!CF, "OR [Status]='CF' ", Null) & _
              IIf(Me!CW, "OR [Status]='CW' ", Null) & _
             IIf(Me!CWR, "OR [Status]='CWR' ", Null) & _
               IIf(Me!o, "OR [Status]='O' ", Null)
    Me.FilterOn = True
Welchen Felddatentyp haben die Felder Type, Action und Status?
Und musste da nicht noch eine Klammer um die ganzen Stati?
Ich denke Type und Action sollen auf jeden Fall erfuellt sein, fuer alle Stati, oder?

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
bobmalaria
Von allem ein bisschen Ahnung, kein Experte


Verfasst am:
16. Okt 2006, 16:36
Rufname:

AW: Bericht mit Checkbox und Textfeld filtern - AW: Bericht mit Checkbox und Textfeld filtern

Nach oben
       Version: Office 2003

bobmalaria am 12. Okt 2006 um 22:40 hat folgendes geschrieben:
Alle Felder sind Text also strings. die eintraege wie "A" "IR" usw. sind zb. werte aus der spalte "status"

deine loesung sieht interessant aus und ich werde sie morgen mal versuchsweise einbauen und dich das ergebnis wissen lassen.

gruss

p.s.: ich glaub hier schneits und das im oktober

sehr geehrter Herr Wipp,

leider war es mir nicht moeglich Ihre Loesung als Verbesserung des bestehenden Codes zu verarbeiten.
Das liegt daran, dass der Aufbau meines Formulars es verhindert diesen Code zu benutzen. Laughing

Hochachtungsvoll und mit grosser Demut bezueglich Ihrer Code- Kuenste

Bob Malaria Wink
Willi Wipp
Moderator


Verfasst am:
17. Okt 2006, 00:26
Rufname:
Wohnort: Raum Wiesbaden

Re: Bericht mit Checkbox und Textfeld filtern (III) - Re: Bericht mit Checkbox und Textfeld filtern (III)

Nach oben
       Version: Office 2003

Hi bobmalaria,

eigentlich sollte der Code nicht anderes machen als der zuletzt von Dir gepostete Code Wink
Wie waere es mit einer Antwort auf meine Fragen Question

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
bobmalaria
Von allem ein bisschen Ahnung, kein Experte


Verfasst am:
17. Okt 2006, 16:11
Rufname:

AW: Bericht mit Checkbox und Textfeld filtern - AW: Bericht mit Checkbox und Textfeld filtern

Nach oben
       Version: Office 2003

beide kriterien, type und action (beides text) sollen zusammen mit den status kriterien (auch text) benutzt werden sobald check64 aktiv ist.
wenn nicht (check64=false) soll nur type mit den status kriterien als filter benutzt werden.
Zitat:
mit deinem code bekomme ich die fehlermeldeung "argument not optional" fuer die zeile: IIf(Me!Check64, "AND [Action]='" & Me![without] & "' ") & _

gruss
Willi Wipp
Moderator


Verfasst am:
17. Okt 2006, 16:41
Rufname:
Wohnort: Raum Wiesbaden

Re: Bericht mit Checkbox und Textfeld filtern (IV) - Re: Bericht mit Checkbox und Textfeld filtern (IV)

Nach oben
       Version: Office 2003

Hi bobmalaria,

sorry mein Fehler, da habe ich das Null vergessen
Code:
    Me.Filter = "[Type]='" & Me![withPO] & "' " & _
        IIf(Me!Check64, "AND [Action]='" & Me![without] & "' ", Null) & _
             IIf(Me!IR, "AND [Status]='IR' ", Null) & _
              IIf(Me!AR, "OR [Status]='AR' ", Null) & _
               IIf(Me!A, "OR [Status]='A' ", Null) & _
              IIf(Me!CF, "OR [Status]='CF' ", Null) & _
              IIf(Me!CW, "OR [Status]='CW' ", Null) & _
             IIf(Me!CWR, "OR [Status]='CWR' ", Null) & _
               IIf(Me!o, "OR [Status]='O' ", Null)
    Me.FilterOn = True
Und fuer die Stati gibt es aus meiner Sicht 2 Versionen (Pseudocode, Annahme alle gesetzt):
1. Type AND Action AND Status1 OR Status2 OR ... OR StatusN
2. Type AND Action AND (Status1 OR Status2 OR ... OR StatusN)
Im 2. Fall muss einer der Stati erfuellt sein, aber in jedem Fall muss Type und Action erfuellt sein.
Im 1. Fall, der dem aktuellen Code entspricht, muss Status1, Type und Actin erfuellt sein,
ODER Status2 ODER Status3 ...
Moegliche Filter im Moment ware z.B.
Code:
[Type]='Was auch immer' OR [Status]='O'
[Type]='Was auch immer' AND [Status]='IR' OR [Status]='O'
Fall 2 klingt fuer mich logischer Wink
_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
bobmalaria
Von allem ein bisschen Ahnung, kein Experte


Verfasst am:
20. Okt 2006, 14:49
Rufname:

AW: Bericht mit Checkbox und Textfeld filtern - AW: Bericht mit Checkbox und Textfeld filtern

Nach oben
       Version: Office 2003

hi,

es will, auch mit diesem code, ums verrecken nicht funktionieren. waehle ich meine zwei kriterien type und action aus, funktioniert alles. klicke ich eine meiner checkboxen an um die auswahl auf einen bestimmten status zu begrenzen, dann werden auch type und action veraendert und ich bekomme einen Bericht mit daten die ich nicht will Evil or Very Mad

ich muss mich wohl doch mal mit dem suchformular beschaeftigen oder eine andere loesung ersinnen.

gruss und danke
Willi Wipp
Moderator


Verfasst am:
21. Okt 2006, 00:52
Rufname:
Wohnort: Raum Wiesbaden


Re: Bericht mit Checkbox und Textfeld filtern (V) - Re: Bericht mit Checkbox und Textfeld filtern (V)

Nach oben
       Version: Office 2003

Hi bobmalaria,

leider hast Du meine Frage nicht beantwortet Crying or Very sad
Vielleicht geht es ja so
Code:
    Dim strFilter   As String
   
    strFilter = IIf(Me!IR, "OR [Status]='IR' ", Null) & _
              IIf(Me!AR, "OR [Status]='AR' ", Null) & _
               IIf(Me!A, "OR [Status]='A' ", Null) & _
              IIf(Me!CF, "OR [Status]='CF' ", Null) & _
              IIf(Me!CW, "OR [Status]='CW' ", Null) & _
             IIf(Me!CWR, "OR [Status]='CWR' ", Null) & _
               IIf(Me!o, "OR [Status]='O' ", Null)
    If strFilter <> "" Then strFilter = "(" & Mid$(strFilter, 3) & ") "
    strFilter = IIf(Nz(Me![withPO], "") <> "", _
                             "AND [Type]='" & Me![withPO] & "' ", Null) & _
             IIf(Me!Check64, "AND [Action]='" & Me![without] & "' ", Null) & _
        IIf(strFilter <> "", "AND " & strFilter & " ", Null)
    If strFilter <> "" Then
        Debug.Print Mid$(strFilter, 4) 'Direktfenster (Strg+G; Testfenster)
        Me.Filter = Mid$(strFilter, 4)
        Me.FilterOn = True
      Else
        Me.FilterOn = False
    End If

_________________
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: Zeilenumbruch bei Textfeld 3 F1 1616 01. Jan 2006, 15:19
F1 Zeilenumbruch bei Textfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Parameterabfrage in Bericht 1 Fabs 2846 08. Dez 2005, 21:38
jens05 Parameterabfrage in Bericht
Keine neuen Beiträge Access Tabellen & Abfragen: Parameter aus Textfeld übernehmen 2 Frankie 1743 04. Dez 2005, 23:34
Gast Parameter aus Textfeld übernehmen
Keine neuen Beiträge Access Tabellen & Abfragen: Import Filtern - Mehrfache Namen auslassen 2 PrinceArthas 713 29. Sep 2005, 21:33
PrinceArthas Import Filtern - Mehrfache Namen auslassen
Keine neuen Beiträge Access Tabellen & Abfragen: Gültigkeitsregel für Textfeld:Ort 1 reteid2222 1319 18. Sep 2005, 11:53
jens05 Gültigkeitsregel für Textfeld:Ort
Keine neuen Beiträge Access Tabellen & Abfragen: Daten filtern mit 2 Kobiboxen 1 Sovi79 604 29. Aug 2005, 15:49
rita2008 Daten filtern mit 2 Kobiboxen
Keine neuen Beiträge Access Tabellen & Abfragen: Datensatz Filtern 6 sandrobz 1041 25. Aug 2005, 20:34
sandrobz Datensatz Filtern
Keine neuen Beiträge Access Tabellen & Abfragen: Filtern nach den letzten xy Datensätzen 1 BML77 507 25. Jun 2005, 20:03
jens05 Filtern nach den letzten xy Datensätzen
Keine neuen Beiträge Access Tabellen & Abfragen: Wert aus Textfeld für Abfrage auslesen 2 Sonic 6622 23. Jun 2005, 08:08
Sonic Wert aus Textfeld für Abfrage auslesen
Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten. Access Tabellen & Abfragen: Fehler beim Filtern von unterschiedlich langen Datensätzen! 1 SteffenL 515 20. Apr 2005, 15:15
Willi Wipp Fehler beim Filtern von unterschiedlich langen Datensätzen!
Keine neuen Beiträge Access Tabellen & Abfragen: Leeres Datum-Feld filtern 2 Hockstrasse 900 16. Feb 2005, 00:36
Hockstrasse Leeres Datum-Feld filtern
Keine neuen Beiträge Access Tabellen & Abfragen: Abfragekriterium mit Checkbox an-/ausschalten 1 amq 814 24. Jan 2005, 13:41
stpimi Abfragekriterium mit Checkbox an-/ausschalten
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Word Serienbriefe