VBA：为列中的重复值添加后缀

Question

希望您能帮助我解决 VBA 中关于为重复值添加后缀的问题。我的范围如下所示：

COL A:
000049
000050
000051
000052 (duplicate)
000052 (duplicate)
000053
000054

我想要实现的是，一旦A列中有重复项，它就会为两个个数字添加一个后缀。我只设法（使用循环）为其中一个字段设置它。

条件：

如果有重复，所有重复的都必须有后缀；
如果有新的重复项（假设我们有 000052A 和 000052B，现在我们移动到 000061），后缀计数必须从 A 重新开始。

非常感谢您的帮助！

Answer 1

你可以用一个公式来做到这一点：

=A1 & IF(COUNTIF(A:A,A1)>1, MID("ABCDEFGHIJK", COUNTIF($A:A1, A1), 1),"")

然后抄下来。

也就是说 "Grab the value from A1 and if there is a duplicate anywhere in column A then go and get the character from string "ABCDEFGHIJK“对应于该值已经出现在列表中的次数（从 A1 到我们所在的任何行）”

VBA：为列中的重复值添加后缀

VBA: Add Suffix to Duplicate Value within Column

vba

range

duplicates

suffix