AddItems to a list box
 

is there a way to add filtered items to a list box. for example, in column
A, add the visible items in the cells to the list box after the range is
filtered.