使用循环来validationExcel用户窗体上的条目?

更新*我有20个文本框标记为T_0_Date(1-20) ,用户可以自由input文本,但我需要validation条目为date,然后才允许脚本的其余部分执行。 例如09-Dec-16是一个预期的条目,如果用户inputWaffle ,我需要脚本来抓住它。 我可以写同样的代码20次,但看起来很丑。 所以只是试图用循环完成这一点。

第一篇文章,所以我提前道歉任何错误。 我正在build立一个用户窗体,有20个字段需要validationdate。 我试图find一种方法来使用循环来完成这一点,以防止我的代码变得丑陋。 我正在尝试:

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

任何帮助,将不胜感激。

谢谢!!!!

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

这就是你如何通过用户forms的控制循环。 别客气 :)