Sub DoTheMath ()
Amortiguar LastR como de largo
Con ActiveSheet
LastR =. Células (. Rows.Count, “c”). Extremo (xlUp). Fila
. Gama (“d2: d” y LastR). Fórmula = “=VLOOKUP (PERCENTRANK (C$2: C$” y LastR y _
“, C2), {0, "" del "" D; 0.2500001, "" del "" C; 0.5000001, "" del "" B; 0.7500001, "" del "" A}, 2)”
. Gama (“b” y (LastR + 2)) = “total”
. Gama (“c” y (LastR + 2)). Fórmula = “=SUM (C2: C” y LastR y ") “
Extremo con
Submarino del extremo
|