Hi, can some one help me to do subtotals in an excel column, based on font colour. (There is more than one colour in my sheet)

As well as lots of notes about counting and sorting with colours, Chip
Pearson has a free download which incorporates the functions described
he

http://www.cpearson.com/excel/colors.aspx

Hope this helps.

Pete

On Jun 29, 4:11*pm, sebyjohn73
wrote:
Hi, can some one help me to do subtotals in an excel column, based on
font colour. (There is more than one colour in my sheet)

--
sebyjohn73

See Chip Pearson's site for Function(s) to detect font and background colors.

http://www.cpearson.com/excel/colors.aspx


Gord Dibben MS Excel MVP

On Sun, 29 Jun 2008 16:11:22 +0100, sebyjohn73
wrote:


Hi, can some one help me to do subtotals in an excel column, based on
font colour. (There is more than one colour in my sheet)

Hi,

Once the color numbers are determined (using the macro below), you can then
use the sumif worksheet function to subtotal by color.

The following macro assumes that you have a blank column next to the numbers
with different font colors, and that you have activated the first cell in the
range of numbers.

Sub ColorNumber()

x = ActiveCell.Row
y = ActiveCell.Column

Do While Cells(x, y).Value < ""

ActiveCell.Offset(0, 1) = ActiveCell.Font.Color
ActiveCell.Offset(1, 0).Activate
x = x + 1

Loop

End Sub

- Peggy

"sebyjohn73" wrote:


Hi, can some one help me to do subtotals in an excel column, based on
font colour. (There is more than one colour in my sheet)




--
sebyjohn73

Thank you very much

regards, seby