在ComboBox

Question

我的UserForm上有两个字段;一个是ComboBox，另一个是TextBox。

根据ComboBox值，我填充了TextBox的值。

但是我必须单击TextBox字段才能获得自动值。

我希望只要在ComboBox中选择一个值就可以更新TextBox，而无需单击TextBox。

我的代码：

Private Sub ComboBox1_AfterUpdate()
    With Me
        .TextBox1 = Application.WorksheetFunction.VLookup(Me.ComboBox1, Sheet2.Range("C:D"), 2, False)
    End With
End Sub