首页 > 解决方案 > 验证用户表单的文本框

问题描述

我有两张名为“内部库存”和“维护详细信息”的工作表。我正在使用用户表单将数据输入到维护详细信息数据表中。有一个组合框可以选择用于维护的材料类型,还有一个文本框可以输入使用的材料数量。如果用户输入的物料数量大于库存中物料的可用数量,我想生成错误消息。(例如,库存有15L的润滑油,如果用户从组合框中选择润滑油并输入数量为20L,我想生成一个错误消息,说输入的材料数量大于库存中的可用数量.) 这就是我所做的,这会为输入到数量文本框中的每个值生成一条错误消息。我对 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

标签: excelvbatextboxuserform

解决方案


推荐阅读