Question

我从来不需要学习VBA，因为我可以始终使用Excel公式进行学习-这次不是。游戏计划-输入数据后创建用户表单，数据经过验证，然后问题就开始了。到目前为止，我只学习了3天的VBA。

当上面具有相同的值时，找不到找到行中单元格最后一个值的解决方案。幸运的是，这次我湿透了它，但是我还是想知道如何去做。

无法使我的“用户输入数据”代码正常工作。我设法编写了一个代码来检查文本框，但是当我将代码的版本添加到清单框时，所有的工作都花光了。

Private Sub OK_Click()
Application.ScreenUpdating = False
If a1 = "" Or a2 = "" Or a3 = "" Or a4 = "" Or imie = "" Or Surname = "" _
Or nino = "" Or Post = "" Or sdate = "" Or En = "" Then ' THIS WORKS
   MsgBox ("Please fill all the data DAN, this is not gonna fly!!!")
   Exit Sub
End If  

'  Or _
     Or   Or posi.ListIndex <> 0 _ - THIS CREATES AN ERROR MESSAGE every time EVEN IF FILLED ???
Or Pre.ListIndex <> 0 or  
Call wpiszdane
Call FORMULA_FILL
Application.ScreenUpdating = True
Unload Me

下一步是检查数据正确性。如果代码采用的是数据格式，则开始日期采用“数据格式”等。-到目前为止，我搜索过的内容似乎要困难得多。

我在这里做错了什么？我的第一次编码尝试是否像我想的那样没有希望？我相信我也许能够解决通过循环查找行中最后一个重复值的问题，以及通过循环检查用户表单中的所有数据，但不知道如何解决。任何帮助表示感谢，谢谢。

我的文件以防万一 http://s000.tinyupload.com/index.php?file_id=14544105192658047753

Excel VBA代码，用户表单数据验证，连续的最后一个实例

0 个答案: