excel vba fill comobox

2011-06-10 73 views 0 likes

我必須爲vba中的用戶表單填充幾個組合框，但當加載用戶窗體時組合框未填充。這裏是代碼：excel vba fill comobox

Private Sub UserForm_Initialize() 
    ComboBox1.Clear 
    ComboBox1.AddItem "C-S-A" 
    ComboBox1.AddItem "C-A-T" 
    ComboBox1.AddItem "C-A-S" 
    ComboBox1.Text = ComboBox1.List(0) 
End Sub 

Private Sub ComboBox1_Change() 
    Select Case ComboBox1.Text 
     Case "C-S-A" 
     Case "C-A-T" 
     Case "C-A-S" 
     Case Else 
    End Select 
End Sub

來源

2011-06-10 user366121

我發現了這個問題。它不得不說「UserForm」。我使用了用戶表單的名稱。 – user366121 2011-06-10 08:34:02

我試過了，它的工作原理應該如此。確保你有一個名爲「ComboBox1」的組合框。還要檢查是否有其他地方的組合框被清除。 – CaBieberach 2011-06-10 08:37:34

是的，它的工作原理。是我的錯誤。 – user366121 2011-06-10 08:44:23