Excel在工作表中過濾並在Userform列表框中填充過濾範圍

Question

我是StackOverflow和Excel/VBA的新手。首先，我做了一些谷歌研究來幫助我解決問題，但沒有很好的解釋，我希望你們能幫忙。

我的問題：

我從A3工作表範圍：V100是填充我的列表框。現在，我在工作表中使用記錄宏和自動過濾器，並且將這些宏添加到我的用戶窗體中的按鈕，但由於結果可能是第5行，第35行，第40行，我的範圍不再正確。我怎樣才能設置一個列表框範圍只爲過濾行而不是整個數據行。

我的電流範圍代碼：

Sub populateListbox1() 

With ListBox1 

    .ColumnHeads = True 
    .ColumnCount = 30 
    .ColumnWidths = "30;30;50;50;60;50;50;50;50;50;50;50;50;0;0;0;0;0;0;0;50;50;0;0;0;0;0;0;0;0" 
    .RowSource = Sheet1.Range("A6", Range("AD" & Rows.Count).End(xlUp)).Address 
End With 

End Sub 

我問：

誰能給我一個正確的代碼爲我行來源範圍時，我應用的自動篩選。或者有人有其他想法來過濾我的列表框？

在此先感謝！

Answer 1

如果找到了一種方法來做到這一點。

我使用「轉到特殊」「僅可見的單元格」我選擇我的結果，將這些值複製到另一個表格中。 我將這些步驟記錄爲一個宏。

畢竟，我像其他任何列表框一樣填充我的列表框。