所需的字段处理Excel VBA
我在Excel VBA中创建了一个应用程序。此应用程序需要用户输入大量条目。提交前,所有字段/单元格都必须具有值。检查用户在每个字段/单元格中输入值的最佳方法是什么。我可以做一些简单的假设陈述,但那将永远无法写出我需要的大量假设。有更有效的方法吗?您需要使用if语句。您可以通过创建助手函数来加快该过程。这一个只检查空数据和数字数据。可以对其进行修改,以便轻松查找日期和文本所需的字段处理Excel VBA,excel,vba,Excel,Vba,我在Excel VBA中创建了一个应用程序。此应用程序需要用户输入大量条目。提交前,所有字段/单元格都必须具有值。检查用户在每个字段/单元格中输入值的最佳方法是什么。我可以做一些简单的假设陈述,但那将永远无法写出我需要的大量假设。有更有效的方法吗?您需要使用if语句。您可以通过创建助手函数来加快该过程。这一个只检查空数据和数字数据。可以对其进行修改,以便轻松查找日期和文本 Function ValidCell(RowPos As Long, ColPos As Long) As Boolean
Function ValidCell(RowPos As Long, ColPos As Long) As Boolean
Dim ws As Worksheet
Dim v As Variant
Set ws = ActiveSheet
v = ws.Cells(RowPos, Colpos).Value
If IsEmpty(v) Or Not IsNumeric(v) Then
ValidCell = False
Else
ValidCell = True
End If
End Function