Excel.Tips.Net Welcome toExcel.Tips.Net

Helpful Links

Tips.Net Home
ExcelTips Home
Ask an Excel Question
Make a Comment

Tips.Net Store

ExcelTips FAQ
ExcelTips Premium

Learn Access Now
Free Printable Forms

Beauty Tips
Car Tips
Cleaning Tips
College Tips
Cooking Tips
Excel2007 Tips
ExcelTips
Family Tips
Gardening Tips
Health Tips
Home Tips
Legal Tips
Money Tips
Organizing Tips
Pest Tips
Pet Tips
Wedding Tips
Word2007 Tips
WordTips

Advertise on the
ExcelTips Site

Newest Tips

Recording a Macro

Adding a Little Animation to Your Life

Converting a Range of URLs to Hyperlinks

Making the Formula Bar Persistent

Engineering Calculations

Digital Signatures for Macros

Fixing the Decimal Point

 

Formatting Subtotal Rows

Summary: Using Data | Subtotals you can add different types of subtotals to a data table. These subtotals are normally shown in bold, but you may want to apply other types of formatting. This tip provides several different approaches you can take toward that formatting. (This tip works with Microsoft Excel 97, Excel 2000, Excel 2002, and Excel 2003.)

When you add subtotals to a worksheet, Excel automatically formats the subtotals using a bold font. You, however, may want to have some different type of formatting for the subtotals, such as shading them in yellow or a different color.

If you use subtotals sparingly, and only want to apply a different format for one or two worksheets, you can follow these general steps:

  1. Apply your subtotals, as desired.
  2. Select the entire data table, including the subtotals.
  3. Using the Outline area at the left of the screen, collapse the detail in your worksheet so that only the subtotals are showing.
  4. Press F5 to display the Go To dialog box. (Click here to see a related figure.)
  5. Click Special to display the Go To Special dialog box. (Click here to see a related figure.)
  6. Select the Visible Cells Only option button.
  7. Click OK. Now, only the visible subtotal rows are selected.
  8. Apply your formatting, as desired.

If you will be repeatedly adding and removing subtotals to the same data table, you may be interested in using conditional formatting to apply the desired subtotal formatting. Follow these steps:

  1. Before applying your subtotals, select your entire data table.
  2. Choose Conditional Formatting from the Formatting menu. Excel displays the Conditional Formatting dialog box.
  3. In the left-most drop-down list, choose Formula Is. The dialog box changes to reflect your choice.
  4. In the formula box, just to the right of the drop-down list used in step 3, enter the following formula: =ISNUMBER(FIND("Grand Total",$A1)). (Click here to see a related figure.)
  5. Click Format to display the Format Cells dialog box.
  6. Using the controls in the dialog box, set the formatting as you want it applied to the Grand Total row.
  7. Click OK to dismiss the Format Cells dialog box.
  8. Click Add. Excel adds a second conditional format.
  9. In the left-most drop-down list of the second condition, choose Formula Is. The dialog box changes to reflect your choice.
  10. In the formula box, just to the right of the drop-down list used in step 9, enter the following formula: =ISNUMBER(FIND("Total",$A1))
  11. Click Format to display the Format Cells dialog box. (Click here to see a related figure.)
  12. Using the controls in the dialog box, set the formatting as you want it applied to the Total row.
  13. Click OK to dismiss the Format Cells dialog box.
  14. Click OK to dismiss the Conditional Formatting dialog box.

When following the above steps, make sure that you replace A1 (steps 4 and 10) with the column in which your subtotals are added. Thus, if your subtotals are in column G, you would use G1 instead of A1.

If you need to do formatting of subtotals on quite a few worksheets, then you may want to create a macro that will do the formatting for you. The following macro examines all the cells in a selected range, and then applies cell coloring, as appropriate.

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

The macro colors the subtotal rows yellow and the grand total row orange. The macro, although simple in nature, is not as efficient as it could be since every cell in the selected range is inspected. Nevertheless, on a 10 column 5000 row worksheet this macro runs in under 5 seconds.

ExcelTips is your source for cost-effective Microsoft Excel training. This tip (2984) applies to Microsoft Excel versions: 97 | 2000 | 2002 | 2003

Organize Your Data! Using the powerful sorting capabilities of Excel can help you get your data into just the order you need. Find out how you can use the full capabilities of sorting to your benefit.
 
Check out ExcelTips: Serioius Sorting today!