Excel Vba Count Elements In A Stack