时间戳

首页 > 解决方案 > 删除第 1 列中存在重复的行

excel - 删除第 1 列中存在重复的行

问题描述

所以，我在 Excel 中有一个表格（A 到 J 列）。

我想删除 A 列中有重复值的任何行（该列应该只有唯一的字符串）。

这是我尝试过的代码，但它似乎不起作用......

Sub RD()

Dim rg As Range
 
Set rg = Range("A1").CurrentRegion

rg.RemoveDuplicates Array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11), xlYes

End Sub

这个版本的 excel 似乎不需要我在倒数第二行写“列”或“标题”（尽管它们会弹出）。当我尝试添加它时出现语法错误。

标签： excelvba

解决方案

要从中删除重复值column A，您几乎编写了当前过程，并将您的行替换为以下内容，它将起作用：

rg.RemoveDuplicates Columns:=1, Header:=xlYes

推荐阅读