How can create own formula for count font color cell value with VBA- Sheet attached

Published --