Why in VBA? - this would be so much easier to do in a formula.