Excel 如何将项目添加到列表框

我在多个文本框中的Userform上有一组数据

我已经写了一个代码，看看是否有一个空白的文本框会使数据表不完整

如果数据不完整，我希望它获取我的批号（在

Txtbox10A10

中），并将批号放入我的列表框中，以便我以后可以访问它以完成数据

---

我有什么办法可以做到这一点吗？我尝试了多种方法，但有很多错误。

您好，很抱歉，vba还是个新手

我有以下一组代码

enter code here

---

大家好，欢迎来到SO。恐怕您的问题太不清楚，无法回答，您必须更加具体（包括您的代码并指出您的错误）。请选择，用a勾选一个问题，并相应地编辑您的问题=）向下滚动此页面，查看页面右下角的问题列表-它们与您的问题非常匹配。您可能会在那里发现一些有价值的东西。添加不完整的记录集时，必须保留列的批处理值。然后将该列用作列表框数据源。您是如何加载列表框的？并且，请将您的代码添加到您的问题中。请参阅并检查SO上的示例。您可能希望使用此信息重新编写原始问题。

Dim i As Integer
Dim J As Integer
Dim uppercolJ As Integer
Dim Mistakes As Integer
Dim x As Integer
'    cmas = UserForm3.MultiPage1.Pages(UserForm3.MultiPage1.Value).Controls("Txtbox" & 1 & "A" & J)


Set Form = UserForm3.MultiPage1.Pages(UserForm3.MultiPage1.Value)
uppercolJ = 41
Mistakes = 0
        For J = 28 To uppercolJ
            ActiveTextBoxName = "Txtbox" & 1 & "A" & J

            If UserForm3.MultiPage1.Pages(3).Controls(ActiveTextBoxName) = "" Then
                Mistakes = Mistakes + 1

            Else


    End If
        Next J
         If Mistakes > 0 Then
  MsgBox "Cells are incomplete, saving for later completion"

Else
MsgBox "comp"
'Call save
End If
End Sub`````






now when Mistakes > 0 
then i would like it to save the batch no. of the product which can be found in Txtbox10A10
to a listbox i have created. so that if i come back tomorroww  to finish all my data i can call that information from the batch no. in my listbox,


i have all coding already done just not sure how to get it to add my backnumber to the listbox upon Mistakes > 0