如何在VBA Excel中检查整个列？

Question

所以我的老板需要我错误检查表格。当您单击按钮时，用户应该在添加任何信息之前位于第一列中，否则它需要显示一条错误消息，告诉他们在开始之前需要在第一列中。我们一直在使用ActiveCell.Offset自动插入数据，如果从第一个列以外的任何其他列开始，则信息由一个单元格关闭。

这是我的错误代码。此代码本身就是表单，我需要在该程序所需的模块中调用它。非常感谢任何帮助。

Public Sub Error_Check()
If Not Range(A1, [A1,048,576]) Then
        MsgBox ("Please make sure you are in the Product Attribute Set column before proceeding.")
    Else
        ConfigGroup.Show
End If
End Sub

Answer 1

我看到两种可能的解决方案。

1. 引用第一列，即SheetName.Columns(1)

，而不是引用活动单元格的代码

2. 如果您希望保留基于ActiveCell.Offset的代码，为什么不让宏在用户的第一列中选​​择一个单元格？例如，在代码的开头插入Cells(1,1).Select。