Vba Elements In Array Count Value