Question

Excel窗体选项按钮与复合框关联的IF代码

窗体上有两个选项按钮和一个复合框，当选择选项按钮1时，复合框内容等于A1:A20,当选择选项按钮2时，复合框内容等于B1:B20，然后无论选择选项按钮几，当选择复合框里的某一内容时，显示C1:C20与之相应的内容。这个代码如何写？是不是还需要一个命令按钮？求大神!

Answer 1

Private Sub ComboBox1_Change()
On Error Resume Next
TextBox1.Text = Cells(ComboBox1.ListIndex + 1, 3)
End Sub
Private Sub CommandButton1_Click()
Dim i As Integer
i = 1
ComboBox1.Clear
While Cells(i, 1) <> ""
ComboBox1.AddItem Cells(i, 1)
i = i + 1
Wend
End Sub
Private Sub CommandButton2_Click()
Dim i As Integer
i = 1
ComboBox1.Clear
While Cells(i, 2) <> ""
ComboBox1.AddItem Cells(i, 2)
i = i + 1
Wend
End Sub