Excel Vba Visibleitemslist Array Variable Has Incorrect