相同的值然后递增

时间:2013-07-26 00:25:51

标签: excel vba increment

我是VBA的新手,需要帮助制作一个宏来基本查看列中的值是否相同,并在另一列中增加。有点令人困惑,所以这是一个例子:

INBOUND.T28 1
INBOUND.T28 2
INBOUND.T28 3
INBOUND.T28 4
INBOUND.T29 1
INBOUND.T29 2
INBOUND.T29 3
INBOUND.T29 4
INBOUND.T29 5
INBOUND.T30 1
INBOUND.T30 2
INBOUND.T31 1
INBOUND.T31 2
INBOUND.T31 3

列A已存在于文件中,我希望B列如上所示进行打印。它基本上计算A中相同值的数量,并在找到新值时重新开始计数。

我对VBA并没有什么好处 - 尽管我过去曾经做过Java,但我知道我需要使用某种IF语句和一个计数器,例如

value = value + 1 

也许是这样的事情?

Range("A1").Value = Range("A1").Value + 1 

请帮助,我不知道如何做VBA并随时学习:P谢谢! -

1 个答案:

答案 0 :(得分:0)

假设'INBOUND.T28'在A列,而在B栏旁边是1,那么这个公式应该适合B2

  

= IF(A1 = A2,B1 + 1,1)

表示第一行数据,如果您的第一行是空白或标签。您可以使用带有Application.WorksheetFunction的VBA填充此B行和后续B列。