Supportnet / Forum / Tabellenkalkulation
Makro:1. Kopieren von Werten mit „Bedingte Formatierung...“. 2. bei bleuem Wert Spalten löschen
Frage
Hallo an alle.
1.
- J5:AY8 ist der gesamte zu kopierende Bereich
- In Zeile 5 stehen die Werte die sich aus Formeln ergeben und über „Bedingte Formatierung...“ formatiert wurden (die Werte auf die sich die Bedingte Formatierung stützt werden nicht mit kopiert).
In Zeile 6 steht Text
Zeile 7 und 8 sind verbundene Zellen je Spalte. Also J7:J8 dann K7:K8 dann L7:L8 usw. in diesen steht auch Text
1. Ich möchte mittels Makro den Zellbereich J5:AY8, aus einem Tabellenblatt in ein anderes kopieren. Eingefügt soll es werden beginnend bei A1. Nur die Werte mit den derzeitigen Farben.
2. Knüpft an 1. Durchsuche alle Zellen der Zeile 1 von A:AP, finde alle Werte die blau sind und lösche die ganzen Spalten in denen sich die blauen Werte befinden. (In dem Tabellenblatt befinden sich dann nur noch die Spalteninhalte deren Farbe hellgrün, hellblau, rot und schwarz sind)
Hoffe ihr könnt mir helfen?
Antwort 1 von coros
Moin Oha,
um Dir da ein einigermaßen vernünftiges Makro zu erstellen fehlen noch ein paar Infos und in Deiner Datei muss etwas geändert werden. Das Problem ist die Auswertung der Farben die durch die bedingte Formatierung erfolgt. Das ist unheimlich kompliziert, da man die Zellen nicht nach den ColorIndexzahlen abfragen kann. Man kann höchstens ebenfalls durch die bedingte Formatierung in einer Hilfsspalte einen Buchstaben oder eine Zahl eintragen lassen, nach der man dann suchen läßt. Man kann das sicherlich auch ohne Hilfsspalte und nur durch VBA herausfinden lassen, aber wie schon geschrieben ist kompliziert und mir fehlt dazu im Moment die zündende Idee. Besser wäre es, die bedingte Formatierung durch einen VBA Code zu ersetzen, der das dann erledigt. Allerdings benötige ich dazu den Bereich, auf den die VBA bedingte Formatierung angewendet werden soll und die Kriterien mit Angabe der Farbumschläge.
Zu1. Dann verstehe ich nicht, was Du mit den
derzeitigen Farben
meinst. Meinst Du alle Zellen, die eine andere Hintergrund- oder Schriftfarbe als Weiß haben?
Zu 2. Wie kommen die Farben zustande? Auch wieder durch die bedingte Formatierung oder färbst Du die Zellen per Hand. Wenn diese Farben ebenfalls durch eine bedingte Formatierung erfolgen, benötige ich auch hierzu die Kriterien und die Farbumschläge.
Eventuell kannst Du mir die Datei ja mal schicken, da es bei verbundenen Zellen immer wieder zu Problemen mit dem Makros kommt. VBA und verbundenne Zellen sind sich spinne Feind. Also wenn Du willst, und die Datei nicht dem Datenschutz unerliegt oder die EInträge mich nichts angegehen, wobei die gelöscht werden können, dann schicke die Datei an meine E-Mail:coros@excelbeispiele.de
Dann klär mal alle Fragen von mir und dann wird da sicherlich etwas Vernünfiges für Deine Zwecke herauskommen.
MfG,
coros
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
um Dir da ein einigermaßen vernünftiges Makro zu erstellen fehlen noch ein paar Infos und in Deiner Datei muss etwas geändert werden. Das Problem ist die Auswertung der Farben die durch die bedingte Formatierung erfolgt. Das ist unheimlich kompliziert, da man die Zellen nicht nach den ColorIndexzahlen abfragen kann. Man kann höchstens ebenfalls durch die bedingte Formatierung in einer Hilfsspalte einen Buchstaben oder eine Zahl eintragen lassen, nach der man dann suchen läßt. Man kann das sicherlich auch ohne Hilfsspalte und nur durch VBA herausfinden lassen, aber wie schon geschrieben ist kompliziert und mir fehlt dazu im Moment die zündende Idee. Besser wäre es, die bedingte Formatierung durch einen VBA Code zu ersetzen, der das dann erledigt. Allerdings benötige ich dazu den Bereich, auf den die VBA bedingte Formatierung angewendet werden soll und die Kriterien mit Angabe der Farbumschläge.
Zu1. Dann verstehe ich nicht, was Du mit den
derzeitigen Farben
meinst. Meinst Du alle Zellen, die eine andere Hintergrund- oder Schriftfarbe als Weiß haben?
Zu 2. Wie kommen die Farben zustande? Auch wieder durch die bedingte Formatierung oder färbst Du die Zellen per Hand. Wenn diese Farben ebenfalls durch eine bedingte Formatierung erfolgen, benötige ich auch hierzu die Kriterien und die Farbumschläge.
Eventuell kannst Du mir die Datei ja mal schicken, da es bei verbundenen Zellen immer wieder zu Problemen mit dem Makros kommt. VBA und verbundenne Zellen sind sich spinne Feind. Also wenn Du willst, und die Datei nicht dem Datenschutz unerliegt oder die EInträge mich nichts angegehen, wobei die gelöscht werden können, dann schicke die Datei an meine E-Mail:coros@excelbeispiele.de
Dann klär mal alle Fragen von mir und dann wird da sicherlich etwas Vernünfiges für Deine Zwecke herauskommen.
MfG,
coros
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.