Excel Vba Loop Through Filtered Rowspan