在特定条件下在用户窗体中显示消息框

Question

enter image description here我的工作表1包含3列项目，品牌，数量和用户窗体，在工作表1中包含与textbox1、2、3相同的元素。当我在用户窗体中写入数据时，我会编写代码，向我显示警告消息“您只能添加3或4 ...等个品牌。

有关显示消息的更多说明取决于textbox3示例 sheet1中的第3列包含数量，当我在textbox3中填充的内容多于第3列时，则显示消息。

Answer 1

我仍然不确定您的意思，但是尝试这样的操作

Private Sub TextBox1_AfterUpdate()

'assuming this is the range where the relevant values are'
MaxValu = Application.WorksheetFunction.max(Sheets("Sheet1").Range("C3:C5"))

'change the text box value to an integer'
TxtBoxValu = CInt(Me.TextBox1.Value)

If TxtBoxValu > MaxValu Then MsgBox "this value is too high, the maximum you can 
pick is " & MaxValu 


End Sub