Excel Vba Count Elements In A Vector Quantity