用excel筛选对应的数据
导出到新的excel表
这种常见的功能是非常有用的
如果用程序来实现,就很酷了,还要是js实现,这是太酷了

// wps官方文档:https://qn.cache.wpscdn.cn/encs/doc/office_v19/index.htm

效果展示

WPS开发 js宏开发 筛选表格数据 导出到新表格_wps


得到结果:将关键词【李】对应的数据导出

该excel下载地址【筛选数据.xls】:https://gitee.com/618859/wps-js-dev/blob/master/%E7%AD%9B%E9%80%89%E6%95%B0%E6%8D%AE.xls

WPS开发 js宏开发 筛选表格数据 导出到新表格_数据导出_02

源码

复制放到【宏里面】即可

function 数据筛选(){
	var oneRow = Range("a1:c1").Value()
	var keyWord = Range("F2:F2").Value()[0]
	console.log("oneRow"+oneRow)
	var Arr1=[];
	Arr1.push(oneRow[0]);
	var Arr2=Range("a2:c5").Value();
	for (var row of Arr2){
		console.log("row:"+row)
		if (row[0].includes(keyWord)){
			Arr1.push(row);
		}
	}
	let maxNum = 1000;
	for(var i=1;i<maxNum;i++){
		var nowRow = Application.Worksheets.Item("Sheet1").Rows.Item(i)
		var rowVal = nowRow.Value()
		if(rowVal[0][0]){
			console.log('cell-0:'+rowVal[0][0])
			nowRow.Delete()
		} else {
			break
		}
	}
	// Range("E2").Resize(Arr1.length, 3).Value2=Arr1
	ActiveWorkbook.Sheets('Sheet1').Range("A1").Resize(Arr1.length, 3).Value2=Arr1
}