在excel vba中仅更改第一次出现的列名

时间:2015-06-03 11:12:26

标签: vba excel-vba excel

我的数据集包含manys列,其列名与

类似

ABC AAA SSD AAA VFD FDS AAA

我们有许多同名的列。这是AAA。

我想将第一个AAA重命名为“FIRST”,将其他AAA重命名为“OTHERS”。由于第一个AAA可以出现在任何列号中,因此我们不能使用列引用(“A”,“B”)来引用它。

只有在没有其他方式时,我们才能引用column_reference。

如果我使用IF语句,它将更改所有语句。那么我们能做些什么呢?

我希望在Excel VBA中完成此操作,因为我必须将相同类型的方法应用于类似的工作簿。我的程序几乎结束了一个项目,我对此感到震惊。请帮我。

1 个答案:

答案 0 :(得分:2)

根据我的理解,您只想更改1列,如果这是正确的,那么就这样做

Dim hasChanged As Boolean

'and now do your code with a small change
hasChanged = False
If cell.Value = "I am" And hasChanged = False Then
    cell.Value = "Gender"
    hasChanged = True
End If