Bedingte Formatierung beim Ausschneiden beibehalten
31938
durron597
Ich habe einige Daten aus verschiedenen Quellen, die ich anstrebe, um einen Überblick darüber zu bekommen, welche Felder sie gemeinsam haben und welche nicht. Um das Anzeigen von Zeilen zu erleichtern, habe ich eine bedingte Formatierungsregel wie folgt eingerichtet:
Regel:
=MOD(ROW(),2)=0
Gilt für:
=$1:$1048576
Aktion:
Turn Green
Das funktioniert großartig ... bis ich einen Zellenblock ausschneide und in eine Spalte oder eine andere füge. Das "intelligente Ausschneiden und Einfügen" von Excel unterbricht alles, indem es Regeln dupliziert oder Abschnitte aus der Region entfernt. Ich muss die bedingte Formatierung erneut korrigieren. Wie kann ich die Daten verschieben, ohne die Regeln für die bedingte Formatierung zu ändern?
Ich habe eine Lösung gefunden und dieses Makro aufgenommen:
Sub FomattingRules() ' ' FomattingRules Macro ' ' Keyboard Shortcut: Ctrl+e ' Cells.Select Cells.FormatConditions.Delete Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _ "=MOD(ROW(),2)=0" Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority With Selection.FormatConditions(1).Interior .PatternColorIndex = xlAutomatic .ThemeColor = xlThemeColorAccent3 .TintAndShade = 0.599963377788629 End With Selection.FormatConditions(1).StopIfTrue = False End Sub
Technisch funktioniert das, aber ich würde eher eine Lösung finden, bei der ich nicht immer wieder Strg + e drücken muss. Aber es ist besser, als die Regeln von Hand zurückzusetzen, schätze ich.
1
irockyoursocks
Es gibt keine großartige Möglichkeit, dies zu umgehen. Ich empfehle, die Werte zum Kopieren und Einfügen zu verwenden und dann den Inhalt der ursprünglichen Zellen zu löschen. Dadurch bleiben alle Formatierungen unverändert, der Zellinhalt wird jedoch erfolgreich verschoben. Dies ist etwas umständlich, aber Sie können die bedingte Formatierung bei jedem Ausschneiden und Einfügen erneut durchführen. Sie entscheiden, welche Arbeit weniger ist.
In Anbetracht meines Makros halte ich das für weniger Arbeit. Aber danke dafür, dass es keine gute Möglichkeit gibt, dies zu tun!
durron597 vor 11 Jahren
0
@ durron597 Ich stimme zu. Ich wollte nur eine Alternative teilen. Mein Vorschlag behält alle bedingten Formatierungen bei. Während Ihr für das OP vollständig funktioniert, sind andere möglicherweise unglücklich, dass das Makro ALLE bedingten Formatierungen löscht und dann nur diejenige anwendet, die in das Makro integriert ist. Einfach anders.
irockyoursocks vor 11 Jahren
0
1
Bill Kesatie
Not being as talented of a programmer as some of you are, what I did to solve the problem is a short two step process. first, I created one additional line of data separate from the data field I am working on for my project. I made sure that this data line has the correct conditional formatting I want to use across the entire data field. For convenience, I titled this line "Standard".
Next, I simply select the "Standard" line by highlighting all of the cells which have the formula of which I wish to copy. Third, I use the "format painter" function. I click "format painter" (upper left corner of the screen below cut and copy), and then highlight the cells that I want the formula to match the formula preserved in the "Standard" line.
It isn't automatic, but once you create the "Standard" line preserving the conditional formatting you want to use, it is very easy to apply to even a very large data field in just two steps.
0
Chris
Ich hatte das gleiche Problem und fand eine kleine Problemumgehung - vielleicht für Sie verwendbar:
Anstelle von Kopieren und Einfügen : Markieren Sie die letzte Zeile / Spalte (oder den Bereich) und verwenden Sie die Aktion Nach unten füllen / Nach rechts füllen (Tastenkombination: strg+ </ strg+ >). Dann wird auch die Formatierung übertragen.
Dies kann auch mit Makro erfolgen, dh für einen Zeilenbereich:
Range("D2:D15").Select Selection.FillDown
Anstelle von Ausschneiden und Einfügen : Wählen Sie die Zeile oder Spalte aus und BEWEGEN Sie sie, indem Sie den Cursor an den Rand der Auswahl bewegen (das Kreuz mit den Pfeilen erscheint) und ziehen Sie die Zeile / Spalte mit der Maus. drücken SHIFT. Dann ist es kein klassisches Cut & Paste, sondern bewegt. Die Bedingungsformatierung sollte beibehalten werden.
Zu Ihrer Information: Strg ist Strg im deutschen Layout. Die Abkürzung für rechts unten füllen ist Strg + D / Strg + R
phuclv vor 8 Jahren
1
Ausfüllen / Rechts ist kein guter Ersatz für Ausschneiden + Einfügen. Durch Ziehen in Bewegung wird auch die bedingte Formatierung verschoben
Dan Cecile vor 7 Jahren
0
0
Frankie P
Ich habe einen neuen Weg gefunden, dies zu tun!
Sie sperren die Zellen, die bedingt formatiert sind. Beim Ausschneiden und Einfügen bleibt die bedingte Formatierung gleich!
Herzlichen Glückwunsch zu Ihrer Entdeckung. Können Sie Ihre Antwort bearbeiten, um die Details zum Sperren der Zellen zu teilen, die bedingt formatiert sind?
fixer1234 vor 9 Jahren
5
Ich würde wahrscheinlich diese Antwort bestätigen und sogar akzeptieren, wenn Sie sie wie von @ fixer1234 beschrieben bearbeiten
durron597 vor 9 Jahren
0
0
tomOd
Dies ist sehr inelegant, aber auch sehr schnell und scheint, soweit ich das beurteilen kann, perfekt zu funktionieren ...
Kopieren Sie Ihre bedingungsmäßig formatierten Zellen, fügen Sie sie in ein Word-Dokument ein, kopieren Sie die Zellen aus dem Word-Dokument und fügen Sie sie in die Excel-Zielseite ein.
-1
user703269
Zellen zu sperren ist keine Lösung, getestet und funktioniert nicht!
Wenn Sie mit "Inhalte einfügen - keine Formatierung" einfügen, werden bereits formatierte Zellen nicht beschädigt, und Sie müssen sich keine Sorgen machen, dass Ihr Benutzer Makros aktivieren muss, um die Formatierung zu korrigieren. Einfache Fix / Workaround für bereits implementierte Lösungen!
Wie ist das anders als die Antwort von irockyoursocks?
durron597 vor 7 Jahren
0
Es ist anders, da ich die Verwendung von PASTE SPECIAL-No Formatierung anrege. welche Irockyoursocks nicht erwähnt. EINZELHEITEN!
user703269 vor 7 Jahren
0