使用循环验证Excel用户形式上的条目

Question

更新*我有20个标记为T_0_Date(1-20)的文本框，用户可以自由输入文本，但是我需要在允许脚本的其余部分执行之前验证条目作为日期。例如，09-Dec-16是一个预期的条目，如果用户输入Waffle，我需要脚本来捕获它。我可以写20次相同的代码，但看起来很丑。因此，只是试图通过循环完成此操作。

第一篇文章，所以我对提前的任何错误表示歉意。我正在构建一个用户表格，该表格具有20个字段，需要验证为日期。我正在尝试找到一种使用循环来实现此操作的方法，以防止我的代码变得丑陋。我正在尝试：

For q = 1 To 20
tb9 = T_0_DATE(q).Value
If Err And tb9 <> 0 Then MsgBox "Error Message"
Next q

任何帮助将不胜感激。

谢谢!!!!

Answer 1

        Dim cCont As Control
        For Each cCont In Me.Controls
            If TypeName(cCont) = "TextBox" Then
                'more checks and other code
            End If
        Next cCont

这就是您以用户形式通过控件的方式进行的。不客气：）