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);

}

相关推荐
2501_929382651 天前
MobiOffice解锁高级功能版 v15.9.57971 安卓手机doc, docx ppt, .pptx pdf办公软件
智能手机·pdf·powerpoint·wps
爱上妖精的尾巴1 天前
5-22 WPS JS宏reduce数组的归并迭代应用(实例:提取最大最小值的记录)
服务器·前端·javascript·笔记·wps·js宏
程序员莫小特3 天前
WPS 文字制作电子贺卡
wps·教学日志
lijingguang3 天前
excel和word文件默认用office打开而不是用wps
word·excel·wps
jaray5 天前
word和wps下分别设置签名或图片背景透明色的方法
word·wps
烟锁池塘柳06 天前
【已解决】WPS反复报错“我们遇到了一个无法恢复的问题”的解决方法
办公软件·wps
爱上妖精的尾巴12 天前
5-20 WPS JS宏 every与some数组的[与或]迭代(数组的逻辑判断)
开发语言·前端·javascript·wps·js宏·jsa
揭老师高效办公13 天前
Word和WPS文字如何从特定的页开始编号(页码)?
word·wps
PythonFun15 天前
从零开始,用WPS和DeepSeek打造数字人科普视频
音视频·wps
揭老师高效办公16 天前
Word和WPS文字表格内的文字无法垂直居中?这样设置
word·wps