Wenn Sie älter als ein bestimmtes Alter sind, werden Sie sich daran erinnern, wann alle Computerberichte von der MIS-Abteilung mit COBOL und einem Hochgeschwindigkeits-IBM Zeilendrucker erstellt wurden. Diese Berichte werden immer auf Papier mit der Bezeichnung "Greenbar" gedruckt. Vier Reihen waren grün schattiert, dann waren vier Reihen weiß schattiert. Diese Berichte hatten einen Durchmesser von 132 Zeichen, und die Möglichkeit, den Farben zu folgen, half Ihnen, Ihren Platz im Bericht zu behalten.
Die Verwendung der Greenbar-Formatierung in Excel sieht gut aus. Es ist auch noch einfacher, den Linien auf der Seite zu folgen. In diesem Artikel werden drei Optionen zum Anwenden der Greenbar-Formatierung auf einen Bericht erläutert.
Methode 1
Verwenden Sie AutoFormat
- Beginnen Sie mit Daten in einem Listenformat.
- Wählen Sie eine beliebige Zelle in der Liste aus.
- Wählen Sie im Menü Format - AutoFormat
- Im AutoFormat-Dialogfeld werden 6 Formate angezeigt. Verwenden Sie die Bildlaufleiste, um zur dritten Seite der Formate zu gelangen. Wählen Sie das Format List2. OK klicken.
Excel wendet einen Greenbar-Effekt wie folgt an:
Der Nachteil dieser Methode ist, dass beim Sortieren der Daten die Formatierung mit der ursprünglichen Zeile erfolgt. Nach dem Sortieren der obigen Daten nach Kunden ist das schöne Muster von 2-Grün gefolgt von 2-Weiß ein zufälliges Muster von Grün und Weiß:
Methode 2
Verwenden Sie die bedingte Formatierung
- Wählen Sie alle Zellen in Ihrer Liste aus.
- Wählen Sie im Menü Format> Bedingtes Format
- Ändern Sie im Dialogfeld "Bedingtes Format" die erste Dropdown-Liste von "Zellenwert ist" in "Formel ist".
- Geben Sie diese Formel in das Feld Formel ein:
=MOD(ROW(),2)=0 - Klicken Sie auf die Schaltfläche Formatieren…
- Klicken Sie im Dialogfeld Zellen formatieren auf die Registerkarte Muster
- Wählen Sie ein hellgrünes (oder hellblaues oder hellgelbes) Muster. OK klicken.
- Klicken Sie auf OK, um das Dialogfeld Bedingte Formatierung zu schließen
Das Ergebnis ist ein Greenbar-Effekt, bei dem jede zweite Zeile hervorgehoben wird. Es wird durch bedingte Formatierung erstellt. Sie können die Daten neu sortieren, Zeilen löschen oder sogar Zeilen in die Mitte der Daten einfügen. Der Greenbar-Formatierungseffekt bleibt bestehen.
Die Formel im Feld Bedingte Formatierung verwendet die MOD-Funktion. Erinnerst du dich, als du zum ersten Mal gelernt hast, wie man eine lange Teilung macht? Wenn Sie 7 in 25 teilen müssten, könnten Sie die Antwort "3 mit einem Rest von 4" finden? Die MOD-Funktion teilt Ihnen den Rest nach der Division mit. Also, =MOD(25,7)wäre 4 - weil der Rest nach 7 in 25 geht, ist 4.
In der obigen bedingten Formatierung haben Sie die Zeilennummer durch 2 geteilt. Wenn der Rest 0 war, handelt es sich um eine gerade nummerierte Zeile, und das bedingte Formatmuster wurde angewendet.
Es ist möglich, mit der Formel zu experimentieren, um alternative Streifenmuster zu erzeugen. Teilen Sie beispielsweise die Zeilennummer durch 8. Wenn der Rest 0 bis 3 ist, verwenden Sie ein grünes Muster. Verwenden Sie andernfalls das weiße Muster. Hier sind einige Beispielformeln:
- 2 Grün gefolgt von 2 Weiß:
=MOD(ROW(),4)<2 - 3 Grün gefolgt von 3 Weiß:
=MOD(ROW(),6)<3 - 4 Grün gefolgt von 4 Weiß:
=MOD(ROW(),8)<4
Methode 3
Verwenden Sie ein VBA-Makro
Die obige Methode schlägt fehl, wenn Ihre Daten ausgeblendete Zeilen enthalten. Dies ist häufig der Fall, wenn Sie einen AutoFilter- oder Gruppen- und Gliederungsmodus verwenden. Methode 2 kann nicht verwendet werden, wenn Ihre Daten bereits eine bedingte Formatierung aufweisen. In diesem Fall ist die Lösung das folgende Makro. Wenn Sie mit dem Visual Basic-Editor nicht vertraut sind, lesen Sie Einführung in den Excel VBA-Editor.
Geben Sie den folgenden Code für ein Standardmodul ein:
Sub ApplyGreenBarToSelection() n = 0 For Each VisRow In Selection.Resize(, 1).SpecialCells(xlCellTypeVisible) n = n + 1 If n Mod 2 = 0 Then VisRow.EntireRow.Interior.ColorIndex = 35 End If Next VisRow End SubIn der Abbildung unten habe ich die AutoFilter-Funktion aktiviert und nur nach den Datensätzen für Customer DEF gefiltert. Wählen Sie alle Zellen in der Auswahl aus und verwenden Sie Extras - Makro - Makros, um ApplyGreenBarToSelection auszuführen.
Der Schlüssel zu diesem VBA-Makro ist die .SpecialCells-Methode.
