Wenn Sie einem Arbeitsblatt Zwischensummen hinzufügen, formatiert Excel die Zwischensummen automatisch mit einer fetten Schrift. Möglicherweise möchten Sie jedoch eine andere Art der Formatierung für die Zwischensummen, z. B. die Schattierung in Gelb oder einer anderen Farbe.

Wenn Sie Zwischensummen sparsam verwenden und nur für ein oder zwei Arbeitsblätter ein anderes Format anwenden möchten, können Sie die folgenden allgemeinen Schritte ausführen:

  1. Wenden Sie Ihre Zwischensummen wie gewünscht an.

  2. Wählen Sie die gesamte Datentabelle einschließlich der Zwischensummen aus.

  3. Reduzieren Sie im Detailbereich links auf dem Bildschirm die Details in Ihrem Arbeitsblatt, sodass nur die Zwischensummen angezeigt werden.

  4. Drücken Sie F5, um das Dialogfeld Gehe zu anzuzeigen. (Siehe Abbildung 1.)

  5. Klicken Sie auf Spezial, um das Dialogfeld Gehe zu Spezial anzuzeigen. (Siehe Abbildung 2.)

  6. Wählen Sie das Optionsfeld Nur sichtbare Zellen.

  7. OK klicken. Jetzt werden nur die sichtbaren Zwischensummenzeilen ausgewählt.

  8. Wenden Sie Ihre Formatierung wie gewünscht an.

Wenn Sie wiederholt Zwischensummen zu derselben Datentabelle hinzufügen und entfernen, möchten Sie möglicherweise die bedingte Formatierung verwenden, um die gewünschte Zwischensummenformatierung anzuwenden. Befolgen Sie diese Schritte:

  1. Wählen Sie vor dem Anwenden Ihrer Zwischensummen Ihre gesamte Datentabelle aus.

  2. Wählen Sie im Menü „Formatierung“ die Option „Bedingte Formatierung“. Excel zeigt das Dialogfeld Bedingte Formatierung an.

  3. Wählen Sie in der Dropdown-Liste ganz links die Option Formel ist. Das Dialogfeld ändert sich entsprechend Ihrer Auswahl. (Siehe Abbildung 3.)

  4. Geben Sie im Formelfeld rechts neben der in Schritt 3 verwendeten Dropdown-Liste die folgende Formel ein: = ISNUMBER (FIND („Grand Total“, $ A1)). Klicken Sie auf Formatieren, um das Dialogfeld Zellen formatieren anzuzeigen.

  5. Stellen Sie mithilfe der Steuerelemente im Dialogfeld die Formatierung so ein, wie sie auf die Gesamtsummenzeile angewendet werden soll.

  6. Klicken Sie auf OK, um das Dialogfeld Zellen formatieren zu schließen.

  7. Klicken Sie auf Hinzufügen. Excel fügt ein zweites bedingtes Format hinzu.

  8. Wählen Sie in der Dropdown-Liste ganz links der zweiten Bedingung die Option Formel Is aus. Das Dialogfeld ändert sich entsprechend Ihrer Auswahl.

  9. Geben Sie im Formelfeld rechts neben der in Schritt 9 verwendeten Dropdown-Liste die folgende Formel ein: = ISNUMBER (FIND („Total“, $ A1)). Klicken Sie auf Formatieren, um das Dialogfeld Zellen formatieren anzuzeigen. (Siehe Abbildung 4.)

  10. Stellen Sie mithilfe der Steuerelemente im Dialogfeld die Formatierung so ein, wie sie auf die Zeile Gesamt angewendet werden soll.

  11. Klicken Sie auf OK, um das Dialogfeld Zellen formatieren zu schließen.

  12. Klicken Sie auf OK, um das Dialogfeld Bedingte Formatierung zu schließen.

Wenn Sie die obigen Schritte ausführen, stellen Sie sicher, dass Sie A1 (Schritte 4 und 10) durch die Spalte ersetzen, in der Ihre Zwischensummen hinzugefügt werden. Wenn sich Ihre Zwischensummen in Spalte G befinden, würden Sie G1 anstelle von A1 verwenden.

Wenn Sie die Zwischensummen auf einigen Arbeitsblättern formatieren müssen, möchten Sie möglicherweise ein Makro erstellen, das die Formatierung für Sie übernimmt.

Das folgende Makro untersucht alle Zellen in einem ausgewählten Bereich und wendet dann gegebenenfalls die Zellfärbung an.

Sub FormatTotalRows()

Dim rCell as Range

For Each rCell In Selection         If Right(rCell.Value, 5) = "Total" Then             Rows(rCell.Row).Interior.ColorIndex = 36         End If

If Right(rCell.Value, 11) = "Grand Total" Then             Rows(rCell.Row).Interior.ColorIndex = 44         End If     Next End Sub

Das Makro färbt die Zwischensummenzeilen gelb und die Gesamtsummenzeile orange. Das Makro ist zwar einfacher Natur, aber nicht so effizient wie es sein könnte, da jede Zelle im ausgewählten Bereich überprüft wird.

Auf einem Arbeitsblatt mit 10 Spalten und 5000 Zeilen wird dieses Makro jedoch in weniger als 5 Sekunden ausgeführt.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (2984) gilt für Microsoft Excel 97, 2000, 2002 und 2003. Eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Excel (Excel 2007 und höher) finden Sie hier: