EXCEL 2003 - SUBTOTALS
After using the subtotal command, I want to format the spreadsheet by
inserting blank lines before and after each subtotal and grand total. How can I do this without manually inserting blank lines; or how can I create a template with blank lines inserted after each subtotal? -- RCF |
EXCEL 2003 - SUBTOTALS
Does this work for you?
Option Compare Text Sub insert_rows() Dim RowNdx As Long Dim LastRow As Long LastRow = ActiveSheet.UsedRange.Rows.Count For RowNdx = LastRow To 1 Step -1 If Cells(RowNdx, "C").Value Like "*Total*" Then 'edit "C" to suit Rows(RowNdx + 1).EntireRow.Insert Rows(RowNdx).EntireRow.Insert End If Next RowNdx End Sub Gord Dibben MS Excel MVP On Thu, 25 Mar 2010 08:34:02 -0700, RCF wrote: After using the subtotal command, I want to format the spreadsheet by inserting blank lines before and after each subtotal and grand total. How can I do this without manually inserting blank lines; or how can I create a template with blank lines inserted after each subtotal? |
All times are GMT +1. The time now is 06:42 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com