Office: (Office 2010) DropDown-Liste automatisch löschen wenn Vorbedingung sich ändert

Hallo zusammen,

ich benötige mal wieder eure Hilfe.

Ich habe eine Exceltabelle mit mehreren voneinander abhängigen Dropdowns.
jetzt kommt es schon mal vor, das sich im laufe der zeit eine dieser Zellen ändert und da beginnt mein Problem.
Alle Dropdowns, die von diesem DropDown abhängig sind behalten ihren alten wert, was manchmal dazu führt, das man den ein oder anderen wert vergisst zu ändern.
Ist es möglich, das wenn sich der wert eines Dropdowns ändert, alle von diesem Dropdown abhängigen automatisch zu löschen?
Und wenn ja wie muss ich das machen?

Grüße
marx

:)

 

Hallo,

mit einer Anzeige [(Bitte wählen)] lässt sich darauf aufmerksam machen.

 

Hallo xlph,

daran hatte ich auch schon gedacht, nur habe ich leider nicht den Platz für die zusätzlichen Zellen und weitere Zeilen/Spalten kann ich auch nicht einfügen.

 

Hi,

benutze das Change-Ereignis des Tabellenblattes um die abhängigen Zellen zu leeren:

Code:

 

Danke dir, funktioniert.

Jetzt nur noch eine Frage:
da ich die Dateneingabe mit den DropDowns mittels eines Makros in ein vom Makro neu erstelltes Tabellenblatt kopiere, wie stelle ich sicher, das das makro in das neue Tabellenblatt mit kopiert wird?

Edit:
Kann man bei dem Makro auch mehrere Zellen zusammenfassen oder muss jede Zelle einzeln aufgeführt werden?
Ich habe in den Bereichen C11-C16 und H11-H16 in jeder Zeile DropDowns die gelöscht werden müssen.
Wenn ich Range("C11:C16") ins makro schreibe bekomme ich Laufzeitfehler'1004' und der Debugger markiert die Zeile.

Gruß
marx

 

Erstelle das neue Tabellenblatt aus einer Vorlage (die du ausblenden kannst).

 

ok, das Funktioniert, aber was ist mit der zweiten Frage?

Gruß
marx

 

Mein Beitrag ist von 12:29, deine Beitragsänderung jedoch von 12:33: man bekommt nur dann eine Benachrichtigung, wenn ein neuer Beitrag gesschrieben wird, nicht jedoch wenn ein Beitrag editiert wurde - dein nachträgliches Edit konnte ich also gar nicht sehen.


Wo schreibst du das im Code hin? Wie sieht dein jetzt Code aus? Was sagt der Debugger genau (mit der laufzeitnummer kann man nichts anfangen)?

 

Hallo Beverly,

ich habe die Zeile wie folgt angepasst:
Union(Range("B3"), Range("B4"), Range("B5"), Range("C11:11"), Range("H11:11")).ClearContents

Alles was der Debugger sagt ist das was ich geschrieben habe und die obrige Zeile ist Gelb hinterlegt.

Gruß
marx

 

Hi,

der Debugger sagt noch mehr als nur "Laufzeitfehler 1004" - wenn ich deinen Code so nehme wie du ihn gepostet hast, sagt er außerdem "Die Methode Range für das Objekt _Global ist fehlgeschlagen". Dass bedeutet, dass etwas an der Range-Definition falsch ist - und mit dieser Aussage kann man wesentlich mehr anfangen als nur mit dem Laufzeitfehler. So wie du den Code schreibst ist das kein korrekter Zellbereich - da fehlt etwas Union(Range("B3"), Range("B4"), Range("B5"), Range("C11:...11"), Range("H11:...11")).ClearContents

 

Ah stimmt, hab ich völlig übersehen.
Eine Fehlermeldung bekomme ich jetzt zwar nicht mehr, aber er löscht den Bereich C11-C16 und H11-H16 nicht.

 

also bei mir löscht folgender Code die angegebenen Zellen:

Code:

 

Keine Ahnung, was bei mir falsch läuft.
Die Zellen B3-B5 werden gelöscht, die Zellen C11-C16 und H11-H16 bleiben so wie sie waren.

Hab den Code mittels Copy und Paste eingefügt, aber es funktioniert nicht.

Edit:
Fehler gefunden.

Jetzt funktioniert alles.
Danke dir für die Hilfe