Excel Vba Array Count Function