Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Aufgabentabelle per Makro filtern
#1
Hallo zusammen,

folgende Aufgabenstellung habe ich bekommen:
In der angehängten Beispieldatei werden die Namen der Mitarbeiter eingetragen und ihre Aufgabenstellung mit Deadline usw.
Nun soll per Klick auf einen Button diese Liste nach folgenden Kriterien durchsucht bzw. gefiltert werden:

- spucke alle Mitarbeiter aus, die drei Aufgaben bereits gelöst haben und markiere den Namen gelb, aber nur jeweils die erste Zeile mit diesem Namen (ein und derselbe Name steht jeweils vier mal untereinander in der Ausgangsdatei.

Ein weiterer Button soll dann folgendes anzeigen:

- spucke alle Mitarbeiter aus, die alle (4) ihre Aufgaben abgeschlossen haben und markiere den Namen grün, aber nur jeweils die erste Zeile mit diesem Namen.

Dass das Makro nun nach dem Fertigstellungsdatum suchen muss und danach dann die restlichen Daten filtert, weiß ich. Allerdings weiß ich nicht wirklich, wie ich das in ein Makro bekomme. Zumal ich für den Rest der Aufgabenstellung auf dem Schlauch stehe, wie ich es überhaupt anfange.
Habe mal eine Beispieldatei angehangen.
Kann mich hier bitte jemand unterstützen und schulen?


Gruß Patrick


Angehängte Dateien
.xlsx   Test.xlsx (Größe: 10,78 KB / Downloads: 3)
Antworten Top
#2
Ok...muss die Aufgabenstellung leider revidieren. Grade die neue bekommen.

Ausgangsbasis ist gleich. Jedoch sollte es jetzt folgendermaßen laufen. Mit einem Klick auf einen Button geschieht folgendes:

- aus der Tabelle werden alle Mitarbeiter gefiltert, die drei oder mehr Aufgaben erledigt haben. Diese sollen dann in ein andere Sheet kopiert
  werden. Das Sheet, in dem dies reinkopiert werden soll, ich gleich dem Ausgangssheet aufgebaut. Jedoch soll in dem Ausgabesheet jeder
  Name nur einmal auftauchen. Die Namen, die drei Aufgaben absolviert haben, sollen gelb hinterlegt werden, diejenigen, die alle vier erledigt
  haben, sollen grün hinterlegt sein. 

Hoffe, ihr versteht, wie ich es meine. 

Gruß Patrick
Antworten Top
#3
Hallo Patrick,

hier mal ein Formelansatz ohne Makro. Dir werden erst mal alle Mitarbeiter und die entsprechende Anzahl gefiltert. Das könntest Du als Zwischenergebnis nutzen. Ich weiß nun nicht, ob Du eine zusätzliche Liste brauchst oder nur ein Mittel, um die Ausgangstabelle zu formatieren. Für die Liste könntest Du im nächsten Schritt die filtern, die mindestens 3 haben. Zum Färben könntest Du auf Basis dieser Liste eine bedingte Formatierung definieren. Die Formeln aus Zeile 3 musst DU übrigens nur runterziehen, ich habe die nur bis dort hin dargestellt.

Arbeitsblatt mit dem Namen 'Tabelle1'
 ABCDEFGHIJ
1First NameLast NameEmailLine ManagerTaskDeadlineStatusCompletion DateFirst NameCount Of Completition
2KarlSchmidt abcAufgabe 101.12.2015completed30.11.2015Karl2
3KarlSchmidt abcAufgabe 201.12.2015completed01.12.2015Fritz4
4KarlSchmidt abcAufgabe 301.12.2015not started Martin1
5KarlSchmidt abcAufgabe 401.12.2015incomplete Max3
6FritzMeier abcAufgabe 101.12.2015completed02.12.2015 0
7FritzMeier abcAufgabe 201.12.2015completed28.11.2015 0
8FritzMeier abcAufgabe 301.12.2015completed27.11.2015 0
9FritzMeier abcAufgabe 401.12.2015completed01.12.2015 0
10MartinMüller abcAufgabe 101.12.2015not started  0
11MartinMüller abcAufgabe 201.12.2015incomplete  0
12MartinMüller abcAufgabe 301.12.2015not started  0
13MartinMüller abcAufgabe 401.12.2015completed30.11.2015 0
14MaxMustermann abcAufgabe 101.12.2015completed01.12.2015 0
15MaxMustermann abcAufgabe 201.12.2015completed29.11.2015 0
16MaxMustermann abcAufgabe 301.12.2015completed29.11.2015 0
17MaxMustermann abcAufgabe 401.12.2015not started  0

ZelleFormel
I2=A2
J2=ZÄHLENWENNS($A$1:$A$20;I2;$H$1:$H$20;">0")
I3{=WENNFEHLER(INDEX($A$2:$A$99;VERGLEICH(1;(ZÄHLENWENN(I$2:I2;A$2:A$99)=0)*(A$2:A$99<>"");0));"")}
J3=ZÄHLENWENNS($A$1:$A$20;I3;$H$1:$H$20;">0")
Achtung, Matrixformel enthalten!
Die geschweiften Klammern{} werden nicht eingegeben.
Verlassen Sie den Zelleneditor mit Strg+Shift + Enter, statt Enter alleine.
Diese Tabelle wurde mit Tab2Html (v2.5.0) erstellt. ©Gerd alias Bamberg
.      \\\|///      Hoffe, geholfen zu haben.
       ( ô ô )      Grüße, André aus G in T  
  ooO-(_)-Ooo    (Excel 97-2019+365)
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste