-1

我是 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 谢谢！——</p>

4

1 回答 1

0

假设 'INBOUND.T28' 在 A 列中，1并且在 B 列的旁边，那么这个公式应该适合B2：

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

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

于 2013-07-26T00:54:44.157 回答