開發DropDownns空值列表錯誤

Question

我有一個簡單的下拉列表名爲DD8。它使用50行作爲控件，問題是現在只有45行被使用。這意味着在下拉列表中有5個空行。問題是，如果有人選擇一個空行，或不選擇任何東西（默認爲空）休耕代碼會顯示錯誤：

With Worksheets(1) 
     NameProf = .DropDowns("DD8").List _ 
      (.DropDowns("DD8").ListIndex) 
    End With 

我試着像if .DropDowns("DD8").List (.DropDowns("DD8").ListIndex) != ""但OFC的東西，它顯示錯誤。我搜索瞭如何僅使用開發選項卡的DropDown列表選擇已使用的行，但似乎並不可行。

我必須選擇50行，因爲可以添加新的客戶。

你知道它是如何實現的嗎？

Answer 1

如果可以添加新的客戶，那麼我想象一下，希望你能超過50 ....所以它不僅僅是一個問題，現在有5個空白不成爲一個選項，但也允許客戶50-2,483也在他們身邊。 ----沒有關於你的代碼的更多細節，我相信這個建議應該有助於「引導」你，但不能立即解決你的問題。

從本質上講，無論何時調用填充下拉列表，都需要一些代碼來查找客戶列中的最後一行數據，然後指定下拉列表以將客戶的起始行填充到拉斯特羅。這樣，無論您有多少客戶擁有2,48,189 ......他們都會在下拉菜單中顯示，而不會出現此問題。一個簡單的谷歌搜索將產生如何找到Excel中的最後一行。

對不起，我不能僅僅爲了讓它在第二秒就能正常工作而破解代碼，但我認爲這應該是一個很好的起點。