VBA AutoFilter data with running total

[anthonyexcel]

I have some sample data that I AutoFilter. (My real data is about 100000 rows) I need to keep a running total on the data. The formula I use normally is =COUNTIF($B$2:B2,B2) . I know that that will not work with filtered data. The criteria is 111 and B

Running Total ID Group 1 111 A 1 222 B 1 333 A 2 111 B 2 222 A 3 111 B 1 555 A 1 777 B 1 888 A 2 888 B 3 888 A 4 888 B 4 111 A 5 111 B 1 125 A 1 126 B

As you can see gives not the desired results: The desired result would be 1, 2 ,3

Running Total ID Group 2 111 B 3 111 B 5 111 B

Any help would be appreciated!

 

[Fluff]

How about

Fluff.xlsm
	A	B	C	D
1	Running Total	ID	Group	Visible
2	1	111	A	1
3	1	222	B	1
4	1	333	A	1
5	2	111	B	1
6	2	222	A	1
7	3	111	B	1
8	1	555	A	1
9	1	777	B	1
10	1	888	A	1
11	2	888	B	1
12	3	888	A	1
13	4	888	B	1
14	4	111	A	1
15	5	111	B	1
16	1	125	A	1
17	1	126	B	1
Data

Cell Formulas
Range	Formula
A2:A17	A2	=COUNTIFS($B$2:B2,B2,D$2:D2,1)
D2:D17	D2	=SUBTOTAL(103,B2)

Fluff.xlsm
	A	B	C	D
1	Running Total	ID	Group	Visible
5	1	111	B	1
7	2	111	B	1
15	3	111	B	1
Data

Cell Formulas
Range	Formula
A5,A7,A15	A5	=COUNTIFS($B$2:B5,B5,D$2:D5,1)
D5,D7,D15	D5	=SUBTOTAL(103,B5)

 

[anthonyexcel]

Cool!! Thank you Fluff! Thank you for your help!!! Please enjoy your day!!!!

 

[Fluff]

You're welcome & thanks for the feedback.