Get average of some cells of a column If criteria in a different column with vba not worki

[capson]

I need the average of cells in col C for all the cells in col B that have 1
Then the average of cells in col C for all the cells in col B that have 2
.
.
.

I have the following but it in not calculating the averages correctly, I have uploaded a file with data

Thanks

Please Login or Register  to view this content.

[nilem]

maybe

Please Login or Register  to view this content.

or

Please Login or Register  to view this content.

[salim ali]

Check Please this file
special_average.xlsm

[capson]

nilem, this one worked

Please Login or Register  to view this content.

Thank you

salim ali, thank you for this alternative way it works perfectly