2
« am: Dezember 11, 2012, 07:40:56 Vormittag »
Hallo Zusammen!
Ich brauche Eure Hilfe, beim Spezialfilter.
Momentan mache ich im Rahmen meines Maschinenbau-Studiums ein Praktikum und soll eine Vorauswahl bei Excel 'programmieren'.
Folgende Ausgangssituation (Excel 2003):
Ich habe eine Tabelle auf Tabellenblatt2 mit 70 verschiedenen Rotoren, die unterschiedliche Kriterien erfüllen. Das sind beispielsweise: Wellendurchmesser, Drehzahl und Axschub, sowie 11 andere.
Meine Aufgabe ist es jetzt die Tabelle so zu filtern, dass auf Tabellenblatt 1 Grunddaten eingegeben werden, wie Lagergröße 50mm, Drehzahl >22000 und Axschub > 4000 N und auf Tabellenblatt 2 nun nur noch die zutreffenden Rotoren.
Diese Auswahl muss dann noch sortiert werden nach dem Rotor mit dem geringsten Axschub.
Ich habe den Spezialfilter gesetzt und die Kriterien wurden auch so gesetzt, dass 'WAHR' oder 'FALSCH' das erschien. Allerdings wurde trotzdem nur nach dem ersten Kriterium gefiltert.
Ich sitze nun schon einige Zeit hierran und habe auch sämtliche google-Ergebnisse bereits durchgearbeitet, ohne Erfolg. Eine automatische Aktualisierung ist auch wie folgt eingebaut:
Private Sub Worksheet_Calculate()
Range("A2:Q68").AdvancedFilter _
Action:=xlFilterInPlace, _
CriteriaRange:=Range("A77:Q80"), _
Unique:=False
End Sub
Ich hoffe Ihr könnt mir helfen, vielen vielen Dank!
Anbei noch eine stark vereinfachte Arbeitsmappe zu dem Problem