WPS宏获取表格选中区域实现多列重复值删除

第一版是单列删除,ActiveCell返回一个 Range 对象,该对象代表活动窗口的活动单元格,注意区分活动单元格和选定区域。活动单元格是当前选定区域内的单个单元格。选定区域可能包含多个单元格,但只有一个是活动单元格。

function Macro1()

{

//1、获取选中单元格列号

var b = ActiveCell.Cells.Column;

var a = ActiveCell.Cells.Row;

//console.log("选中区域首行:"+a);

//console.log("选中区域首列:"+b);

//2、选中所选单元格所属列

/*知识点:

Cells.Item(a,b),Item是Cells的属性,返回集合中的单个单元格对象

*/

//Sheets("Sheet1").Cells.Item(a,b).EntireColumn.Select();

Sheets("Sheet1").Range(Cells(a,b),Cells(a,b)).EntireColumn.Select();

//3、执行删除重复值

/*知识点:

RemoveDuplicates (Columns 、 Header) ,从值区域中删除重复的值,表示 Range 对象的变量

Variant 包含重复信息的列的索引数组

XlYesNoGuess 指定第一行是否包含标题信息。 xlNo 是默认值;

*/

//Sheets("Sheet1").Cells.Item(a,b).EntireColumn.RemoveDuplicates(1, xlYes);

Sheets("Sheet1").Range(Cells(a,b),Cells(a,b)).EntireColumn.RemoveDuplicates(1, xlYes);

}

第二版是既能单列删除也能多列删除,Selection对象代表窗口或窗格中的当前所选内容,‌每个文档窗格只能有一个Selection对象,‌并且在整个应用程序中只能有一个活动的Selection对象‌。这个Selection查了N多资料,真费劲。

function Macro1()

{

//1、获取当前选中区域

var e =Selection.Cells.Address();

var a = Range(e).Columns.Count;

//console.log("所选区域的列数:"+a);

//console.log("所选区域的地址:"+e);

//2、选中所选单元格所属列

Range(e).EntireColumn.Select();

//3、创建数组,将列数通过遍历添加到数组中

var arr = new Array();

for(var i = 1 ; i <= a ; i++){

arr[i-1]=i;

//console.log(arr.length);

}

//4、执行删除重复值

Range(e).EntireColumn.RemoveDuplicates(arr, xlYes);

}

相关推荐
yanweijie031720 小时前
Excel(WPS表格)中多列去重就用Tocol+Unique组合函数
excel·wps
Jackiejin5261 天前
WPS表格选择性粘贴快捷键怎么使用?WPS如何给表格某一行都加上指定数字?
数据分析·excel·wps
gis91 天前
批量地址解析坐标,支持WPS、EXCEL软件,支持导出SHP、GEOJSON、DXF等文件格式
excel·wps
spencer_tseng4 天前
PPT WPS ERROR +mn-ea
powerpoint·wps
天***88964 天前
怎么卸载或禁用 WPS office的wps看图软件?怎么关闭wps看图软件。或者怎么彻底删除wps?
运维·服务器·wps
wan5555cn4 天前
中国启用WPS格式进行国际交流:政策分析与影响评估
数据库·人工智能·笔记·深度学习·算法·wps
Teable任意门互动4 天前
主流多维表格产品深度解析:飞书、Teable、简道云、明道云、WPS
开发语言·网络·开源·钉钉·飞书·开源软件·wps
专注VB编程开发20年5 天前
JSA变成类似vba环境给第三方软件集成IDE功能,脚本功能
ide·microsoft·node.js·vba·wps·vb6·jsa
shandianchengzi5 天前
【经验】Word/WPS|用邮件合并批量填写表格或教案,单个Word导出成多个文件
word·wps·邮件·办公·邮件合并