必填字段处理 Excel VBA

【问题标题】：Required field handling Excel VBA必填字段处理 Excel VBA
【发布时间】：2010-09-25 04:11:42
【问题描述】：

我有一个在 Excel VBA 中创建的应用程序。此应用程序需要来自用户的大量条目。在提交之前，所有字段/单元格都必须具有值。检查用户是否在每个字段/单元格中输入值的最佳方法是什么。我可以做简单的 IF satatements，但这将花费很长时间来编写我需要的大量 IF。有没有更有效的方法？

【问题讨论】：

标签： excel vba

【解决方案1】：

您将需要使用 if 语句。您可以通过创建辅助函数来加快该过程。这一项仅检查空数据和数字数据。可以修改它以轻松查找日期和文本

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

【讨论】：