找出列是否包含特定数字

Question

现在我有一个循环遍历工作表的宏，该工作表包含有关不同机器部件的数据，使用该数据在另一个工作表上执行各种操作。现在我希望它将每个部件号添加到第三个工作表中的列中，但前提是它不存在。这是我添加部件号的代码：

Rows("1:1").Insert Shift:=xlDown
Range("A1").Value = cpn

我在每个添加的部件号后都找到了列表。有没有比循环更好的方法来确定零件号是否已经存在？

Answer 1

您可以使用COUNTIF方法。就像这样：

Application.CountIf(Range("A:A"), valueThatYouWantToSearchFor)

它将返回包含此值的单元格数。