验证用户表单的文本框

Question

我有两张纸，分别是“内部库存”和“维护详细信息”。我正在使用用户表格将数据输入“维护详细信息”数据表。有一个组合框可以选择用于维护的物料类型，还有一个文本框可以输入所用物料的数量。如果用户输入的物料数量大于库存中物料的可用数量，我想生成一条错误消息。 （例如，库存中有15升润滑油，如果用户从组合框中选择润滑油，并将数量输入为20升，我想生成一条错误消息，指出输入的物料数量大于库存中的可用数量） 这就是我所做的，这会为输入到数量文本框中的每个值生成一条错误消息。 我是VBA的新手，任何帮助将不胜感激。 提前谢谢。

Private Sub MaterialQuantityTextBox_AfterUpdate()
    If MaterialQuantityTextBox.Value > Application.WorksheetFunction.VLookup(Me.InhouseMaterialComboBox, Sheet6.Range("B:D"), 3, False) Then
        MsgBox " Quantity is greater than the quantity available in the Inventory. Enter a valid quantity"
    End If
End Sub