ejercutar contar

Hola Grupo necesito un favorcito tengo el siguiente codigo y necesito que cant_prendas tome el valor de el conteo de los productos que estan activos para poder pasarlo al FOR y pues asi no me produca un error gracias Private Sub ...