Office: (Office 2013) 2x Autofiltern und auslesen

Helfe beim Thema 2x Autofiltern und auslesen in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; Hallo zusammen :) Ich habe ein Excel Projekt bei dem ich 2 Spalten habe. In der ersten steht Yes oder No und in der 2. ein Datum oder gar nichts.... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von Dominik.S, 15. Februar 2016.

  1. DOMINIK.S
    Dominik.S Erfahrener User

    2x Autofiltern und auslesen


    Hallo zusammen :)

    Ich habe ein Excel Projekt bei dem ich 2 Spalten habe. In der ersten steht Yes oder No und in der 2. ein Datum oder gar nichts.
    Ich möchte jetzt mit VBA die Tabelle so filtern, dass ich wenn No steht UND ein Datum eingetragen ist gezählt wird.

    habe schon vieles versucht, mit countA und autofiltern aber bin leider noch nicht auf einen grünen zweig gestoßen..

    Vielen dank im voraus für antworten!
     
    Dominik.S, 15. Februar 2016
    #1
  2. Beverly
    Beverly Erfahrener User
    Hi,

    hast du es schon mal mit TEILERGEBNIS(), Funktion 2 (Anzahl) in der Spalte mit dem Datum versucht?

    Bis später,
    Karin
     
    Beverly, 15. Februar 2016
    #2
  3. DOMINIK.S
    Dominik.S Erfahrener User
    Danke! Hat mir sehr viel geholfen! Sollte normal Alles funktionieren.

    Gruß,
    Dominik
     
    Dominik.S, 16. Februar 2016
    #3
  4. DOMINIK.S
    Dominik.S Erfahrener User

    2x Autofiltern und auslesen

    Eins noch ich habe nacher noch eine Zeile:

    ActiveSheet.Range("A1:AJ1").AutoFilter
    ActiveSheet.Range("A1:AJ1").AutoFilter Field:=31, Criteria1:="YES"
    Dim AUT3 As Integer
    AUT3 = Application.WorksheedFunction.CountIfs(ActiveSheet.Range("O:O"), "Finished", ActiveSheet.Range("O:O"), "In Time")
    .AutoFilterMode = False

    funktioniert nur leider nicht..
    Wüsste da jemand warum?
     
    Dominik.S, 16. Februar 2016
    #4
  5. Beverly
    Beverly Erfahrener User
    Was genau "funktioniert nicht"? Falls eine Fehlermeldung auftritt - an welcher Stelle im Code und welche (genaue Beschreibung nicht nur Nummer).

    Bis später,
    Karin
     
    Beverly, 16. Februar 2016
    #5
  6. DOMINIK.S
    Dominik.S Erfahrener User
    Bzw das problem ist, dass ich es anders lösen wollte wie

    Sheets("AUT").Range("AK2").Value = "=COUNTIF(O:O, "Finished")"
    Sheets("AUT").Range("AK3").Value = "=COUNTIF(O:O, "In Time")"

    Und dann davon die summe, weil ich dann einen error wegen den " habe, da vba ja denkt, dass ich da schon fertig bin..
     
    Dominik.S, 16. Februar 2016
    #6
  7. DOMINIK.S
    Dominik.S Erfahrener User
    Der Error lautet wie folgt:

    Run-time error '438':

    Object doesn't support this property or method


    in der Zeile:

    AUT3 = Application.WorksheedFunction.CountIfs(ActiveSheet.Range("O:O"), "Finished", ActiveSheet.Range("O:O"), "In Time")

    das Problem habe ich vorher schon gehabt bei CountIfs
     
    Dominik.S, 16. Februar 2016
    #7
  8. Beverly
    Beverly Erfahrener User

    2x Autofiltern und auslesen

    Erstens musst du hierbie .WorksheedFunction weglassen, da dies eine der neuen Funktionen ist.
    Das würde als Ergebnis aber immer 0 ausgeben, denn COUNTIFS() muss 2 getrennte Kriterienbereiche haben, weil dies eine UND-Verknüpfung von 2 Parametern ist - also die 1. Spalte enspricht dem 1. Kriterium UND die 2. Spalte entspricht dem 2. Kriterium. Wenn du beide Kriterien in derselben Spalte zählen willst, musst du CountIf für jedes einzelne Kriterium verwenden und beide dann summieren.

    Bis später,
    Karin
     
    Beverly, 16. Februar 2016
    #8
  9. DOMINIK.S
    Dominik.S Erfahrener User
    Danke das .WorksheetFunction weglassen hat geholfen :)

    Mfg
    Dominik
     
    Dominik.S, 16. Februar 2016
    #9
  10. Beverly
    Beverly Erfahrener User
    Und du erhältst tatsächlich das richtige Ergebnis? Also bei mir ergibt diese Funktion 0



    Tabelle1[TABLE="width: 1"]
    <colgroup><col style="font-weight:bold; width:40px;"><col style="width:106px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:22px;"><col style="width:106px;"></colgroup><tbody>[TR="bgcolor: #99CCFF"]
    [TD] [/TD]
    [TD]A[/TD]
    [TD]B[/TD]
    [TD]C[/TD]
    [TD]D[/TD]
    [TD]E[/TD]
    [TD]F[/TD]
    [TD]G[/TD]
    [TD]H[/TD]
    [TD]I[/TD]
    [TD]J[/TD]
    [TD]K[/TD]
    [TD]L[/TD]
    [TD]M[/TD]
    [TD]N[/TD]
    [TD]O[/TD]
    [/TR]
    [TR]
    [TD="bgcolor: #99CCFF, align: center"]1[/TD]
    [TD="bgcolor: #FFFF00 , align: right"]0[/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: left"]Finished[/TD]
    [/TR]
    [TR]
    [TD="bgcolor: #99CCFF, align: center"]2[/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [/TR]
    [TR]
    [TD="bgcolor: #99CCFF, align: center"]3[/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: left"]Finished[/TD]
    [/TR]
    [TR]
    [TD="bgcolor: #99CCFF, align: center"]4[/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: left"]Finished[/TD]
    [/TR]
    [TR]
    [TD="bgcolor: #99CCFF, align: center"]5[/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [/TR]
    [TR]
    [TD="bgcolor: #99CCFF, align: center"]6[/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: left"]In Time[/TD]
    [/TR]
    [TR]
    [TD="bgcolor: #99CCFF, align: center"]7[/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: right"] [/TD]
    [TD="bgcolor: #FFFFFF , align: left"]In Time[/TD]
    [/TR]
    </tbody>[/TABLE]

    [TABLE="width: 1"]
    <tbody>[TR="bgcolor: #FFCC66"]
    [TD="colspan: 3"] verwendete Formeln [/TD]
    [TD]Englisch[/TD]
    [/TR]
    [TR="bgcolor: #FFCC66"]
    [TD] Zelle [/TD]
    [TD] Formel[/TD]
    [TD] Bereich [/TD]
    [TD]N/A[/TD]
    [/TR]
    [TR]
    [TD]A1[/TD]
    [TD]=COUNTIFS(O:O,"Finished",O:O,"In Time")[/TD]
    [TD] [/TD]
    [TD] [/TD]
    [/TR]
    </tbody>[/TABLE]
    [TABLE]
    <tbody>[TR="class: style21"]
    [TD="align: left"]http:// excel-inn.de/dateien/vba_beispiele/tabellenanzeige_in_html_addin.zip[/TD]
    [/TR]
    [TR="class: style21"]
    [TD="align: left"]http:// Hajo-Excel.de/tools.htm
    [/TD]
    [/TR]
    [TR]
    [TD="align: left"]XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007[/TD]
    [/TR]
    [TR]
    [TD="align: left"] Add-In-Version 22.0 einschl. 64 Bit[/TD]
    [/TR]
    </tbody>[/TABLE]




    Bis später,
    Karin
     
    Beverly, 16. Februar 2016
    #10
  11. DOMINIK.S
    Dominik.S Erfahrener User
    Nein ich hab mich dann noch ein wenig herumgespielt. schaut jetzt so aus:

    ActiveSheet.Range("A1:AJ1").AutoFilter
    ActiveSheet.Range("A1:AJ1").AutoFilter Field:=14, Criteria1:="Overdue"
    Sheets("BRA").Range("AK3").Value = "=SUBTOTAL(103, N2:N2500)"
    Dim BRA4 As Integer
    BRA4 = Sheets("BRA").Range("AK3").Value
    .AutoFilterMode = False
     
    Dominik.S, 16. Februar 2016
    #11
  12. DOMINIK.S
    Dominik.S Erfahrener User
    habe aber leider ein anderes problem dazubekommen 2x Autofiltern und auslesen :(
    Hab einen Loop um das ganze herum und will jetzt jedes mal um 7 verschoben das ergebnis ausgeben:

    Sheets("Ausgabe").Range((1 + 7 * (i - 1)), 1).Value = "Austria & Switzerland"

    Nur leider geht das nicht.. i ist definiert und alles andere geht auch nur eben mit der formel drinnen nicht.

    Mfg
    Dominik
     
    Dominik.S, 16. Februar 2016
    #12
  13. Beverly
    Beverly Erfahrener User

    2x Autofiltern und auslesen

    Naja, das ist aber dann eine völlig andere Formel... 2x Autofiltern und auslesen :rolleyes:

    Bei Range muss immer der Spaltenbuchstabe (String) angesprochen werden, also in der Form Range("A10"). Für eine rein numerische Ansprache einer Zelle musst du Cells verwenden: Cells(Zeilennummer, Spaltennummer).

    Bis später,
    Karin
     
    Beverly, 16. Februar 2016
    #13
  14. DOMINIK.S
    Dominik.S Erfahrener User
    Danke, habe dank dir das ganze Programm hinbekommen :)

    Funktioniert Alles wie geplant.

    Mfg
    Dominik
     
    Dominik.S, 17. Februar 2016
    #14
Thema:

2x Autofiltern und auslesen

Die Seite wird geladen...

  1. 2x Autofiltern und auslesen - Similar Threads - Autofiltern auslesen

  2. VBA Autofilter mit Zahlen!

    in Microsoft Excel Hilfe
    VBA Autofilter mit Zahlen!: Hallo Ich habe eine eine Tabelle wo die Spalte c mit 4 Stellingen zahlen befüllt ist. Über die Eingabe in einer textbox soll bei der ersten Zahl gefiltert werden. Also textbox Eingabe zum...

  3. Bilder in Zelle mit Autofilter mitverschieben!

    in Microsoft Excel Hilfe
    Bilder in Zelle mit Autofilter mitverschieben!: Hallo Excel Kollegen! Ich habe folgendes Problem. Ich füge per vba ein PDF Symbol als .jpg Datei ein. Soweit funktioniert alles. Wenn ich aber diese Tabelle mit dem Autofilter filtere bleibt das...

  4. PDF erstellen/Autofilter

    in Microsoft Excel Hilfe
    PDF erstellen/Autofilter: Hallo, ich bin eher ein "Excel-Anfänger" und bräuchte Hilfe bezügl. folgender Funktion: Ich habe ein Tabellenblatt mit mehreren Spalten (A-Q) und Zeilen (1-19). Zusätzlich habe ich einen Filter...

  5. Autofilter Daten auslesen

    in Microsoft Excel Hilfe
    Autofilter Daten auslesen: Hallo, ich weiß jetzt nicht ob ihr für VBA Excel auch Hilfe anbietet. Ich habe eine Datenbank: zb. Strichcode Vorname Nachname Als erstes lese ich einen Strichcode ein. Dann wird mittels...

  6. Excel Tabelle mit Autofilter Zelle auslesen

    in Microsoft Excel Hilfe
    Excel Tabelle mit Autofilter Zelle auslesen: Hallo Forum ich habe eine Tabelle mit 5 Spalten mit Tabellenüberschrift. Ich filtere die Tabelle nach einem Kriterium in Spalte A. Als Ergebnis werden mehrere Zeilen oder auch nur 1 Zeile...

  7. Auslesen des "Wertes" Autofilter möglich?

    in Microsoft Excel Hilfe
    Auslesen des "Wertes" Autofilter möglich?: Moin! Kann man den gesetzten Wert eines Autofilter-Feldes auslesen? Ich hab eine Eingabe-Tabelle vor mir, die Produktionsdaten erfasst. Per Autofilter können wir die Ansicht auf bestimmte...

  8. autofilter suchkriterien auslesen

    in Microsoft Excel Hilfe
    autofilter suchkriterien auslesen: hallo. kurz und knapp, ich moechte den inhalt der dropdownliste des autofilters auslesen bzw. auf einem anderen sheet darstellen. ich habe das ganze bisher ueber eine dropdownliste geloest und...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Akzeptieren Weitere Informationen...
    Information ausblenden