Formatting rows when using Subtotals

[DavidC]

I am preparing a macro for a report that includes subtotals using the subtotal command. However, it is difficult to look at, Excel does a lousy job of formatting it. Is there a way to automatically format the subtotal rows, so that it separates the groups a bit more nicely? Perhaps just to change the color of the subtotal rows? Thanks!

 

[Larry]

I copied and pasted that exact code into my VBA editor and I am still only getting one row. Could you tell me what line in the code you wrote actually controls the row insert? I have tried to manipulate it several times so that it will add rows after the remaining subtotals, but I have been unsuccessful.

Your help is greatly appreciated.

Regards,

Larry
This message was edited by Larry on 2002-04-10 07:22

 

[fght]

On 2002-04-10 07:21, Larry wrote:
I copied and pasted that exact code into my VBA editor and I am still only getting one row. Could you tell me what line in the code you wrote actually controls the row insert? I have tried to manipulate it several times so that it will add rows after the remaining subtotals, but I have been unsuccessful.

Your help is greatly appreciated.

Regards,

Larry
This message was edited by Larry on 2002-04-10 07:22

A row is inserted after each sub-total by the following line :-

.Offset(1, 0).Insert

 

[fght]

In what column do your sub-total headings appear?

Suggest that you re-post and ask someone to look at your workbook.

 

[Larry]

My subtotals appear in column A.

Thanks for your help,

Larry
This message was edited by Larry on 2002-04-11 08:16

 

[Chris Davison]

Larry,

try conditional formatting

Highlight row 1

select conditional formatting and then "formula is"

enter : =right($A1,5)="Total"

then pick your formats and click "ok" out

copy the formatting down to the end of your data range

this should only format your lines with totals/subtotals in them

_________________
Hope this helps,
Chris

This message was edited by Chris Davison on 2002-04-13 01:07

 

[glass]

Hello,

How to bring every subtotal figure to a new sheet at continuous rows ( meaning A1,A2,A3…) automatically?



Glass