how to convert COUNTIF() into VBA macro

[erik88]

I sincerely appreciate whoever's help on this question,,,,

I've a problem with countif(),
I want to convert the function as macro,

so here's the case..

alternate :

Name math Bio chemistry 100 90 80
george 80 50 75 0 0 1
mark 70 80 80 0 0 2
hans 90 90 60 0 2 0

I want to count the grade which looks like the example above,
If I want to count 80 of george's then the value of the column will be the same as total the 80 of george's grade (1),

here's the formula

COUNTIF(B2 : D2,100), and so on....

I want to convert the condition into macro but no like if we record a macro, because it can't be dynamic...

thanks in advance...