Office: Makro - wenn dann Zeilen löschen

Hallo alle zusammen!

ich versuche ein Auswahlformular zu erstellen.
Ich nutze Office 2010.

wenn ein Artikel ausgewählt wird sollen nur die dazu passenden Zeilen noch angezeigt werden.

Im Anhang findet Ihr eine Testtabelle die das ganze zeigt.

Wenn in Spalte "C" eine Anzahl eingegeben wird sollen nur die dazu passenden Auswahlzeilen angezeigt werden.

Zeile 4 bis 10 soll immer angezeigt werden.

Bsp.:

1.
In Zeile 5 Spalte C steht eine Zahl größer/gleich 1 dann soll Zeile 22,23,24 und 29,30,31 komplett gelöscht werden.

2.
In Zeile 9 Spalte C steht eine Zahl größer/gleich 1 dann soll Zeile 15,16,17,18,19,20,21 und 25,26,27,28 komplett gelöscht werden.


Vielen, vielen Dank schonmal!!!

Gruß
chris-s79

 

Hallo chris-s79,

möglich ist so ziemlich alles ... Ich würde allerdings an erster Stelle darüber nachdenken, eine Tabelle (Registerblatt) für PKW und eine für Nutzfahrzeuge zu verwenden. Denn: Stell dir einmal vor, dass jemand gibt fälschlicherweise in die Zeile für PKW eine Zahl ein, dann werden die eigentlich benötigten Zeilen gelöscht und es darf von vorne losgehen ... Außerdem ist das viel übersichtlicher ;)

 

Hallo cpt. Nemo,

zuerst einmal Danke das du geantwortet hast.
Diese Tabelle ist ja nur eine "Testtabelle" um zu erklären wie ich es meine. Die richtige Tabelle auf die ich das ganze anwenden wollte hat ein paar Auswahlmöglichkeiten mehr.
Ich glaube aber auch das ich mich falsch ausgedrückt habe. Ich will nicht das die Zeilen gelöscht werden sondern nur zur besseren Übersicht ausgeblendet, verschobenoder oder sonstiges werden. Wenn ich mich dann mal vertippt haben sollte, lösche ich die Eingabe und mache Sie dort wo sie hingehört.
Mittlerweile denke ich, dass das ganze sich nicht mit Makros realisieren läßt.

Hat einer noch eine Idee???

DANKE!

 

Hallo!

Ich habe Dir für das Arbeitsblatt "Tabelle1" eine Ereignissteuerung für das Change-Event eingebaut.

1) Im Folgenden verwende ich für die dunkelgrauen Zeilen den Begriff "Oberkategorie" und für die hellen Zeilen "Kategorie".
2) Wird im Bereich C5:C7 bzw. C9:C10 eine Menge eingegeben, wird dadurch das Change-Ereignis ausgelöst:
2a) dadurch wird in der betreffenden Zeile in Spalte A die dazugehörige Kategorie ermittelt;
2b) und von dort aus wird die dazugehörige Oberkategie (letzte davor befindliche dunkelgraue Zelle in Spalte A) ermittelt.
3) Damit das Ganze funktioniert, muss durchgängig in allen Oberkategorien eine einheitliche Textierung vorhanden sein:
3a) Überall, wo das Wort "nur" nicht enthalten ist, bleiben die Oberkategorie und die dazu gehörigen Kategorien stets unverändert - d.h. sie werden stets angezeigt.
3b) Überall, wo das Wort "nur" enthalten ist, wird geprüft, ob das folgende Wort mit der Oberkategorie (aus Punkt 2b) oder mit der Kategorie (aus Punkt 2a) identisch ist:
3ba) Ist es identisch, werden die Oberkategorie und die dazugehörigen Kategorien angezeigt (bzw. wieder eingeblendet, falls sie ausgeblendet waren);
3bb) Ist es nicht identisch, werden die Oberkategorie und dazugehörigen Kategorien nicht angezeigt (bzw. werden sie ausgeblendet, falls sie eingeblendet waren).
4) Wird im Bereich C5:C76 bzw. C9:C10 eine bereits enthaltene Menge wieder entfernt, werden alle Oberkategorien mit ihren Kategorien wieder angezeigt (bzw. eingeblendet).
5) Damit das Vorstehende auch tatsächlich funktioniert, muss - wie bereits erwähnt - die Textierung in den Oberkategorien einheitlich sein:
5a) Aus diesem Grund habe ich die Oberkategorie "Metaliklakierung" geändert in "Metalliclackierung (nur Auto)",
5b) und ferner habe ich die Oberkategorie "Funk Nutzfahrzeuge" geändert in "Funk nur Nutzfahrzeuge".
5c) und ferner muss die Hintergrundfarbe der Oberkategorien (zumindest in Spalte A) einheitlich sein, definiert durch den Hintergrundfarbwert der Zelle A4 (momentan RGB(90,90,90) ).
Ich habe Dir im Makro an den entscheidenden Stellen Kommentar beigefügt, sodass Du auch noch Anpassungen durchführen kannst.

Und, wie gesagt, wirkt sich das Makro nur auf das Arbeitsblatt "Tabelle1" aus.
Sollte es auch in anderen Arbeitsblättern anzuwenden sein, müsste es auch dorthin kopiert werden - oder aber in die Arbeitsmappe. Auf Arbeitsmappenebene müsste aber der Prozedurenkopf des Change-Events etwas geändert werden.