wps的js宏操作代码1

分享一个自己学到的js宏操作数据处理的代码

//数组的遍历方法和条件判断

function 批量删除()
{
	var rng = Range("A1:A50");
	let unionRng = null;
	// 将所有符合条件的行拼在一起
	for(r of rng){
		if(/\D+/.test(r.Value2)){ // 删除条件:内容非数字
			if(unionRng == null){
				unionRng = r.EntireRow;
			}else{
				unionRng = Application.Union(unionRng, r.EntireRow);
			}
		}
	};
	// unionRng.Select();
	unionRng.Delete(xlShiftUp); // 一次性删除
}


function 批量删除(){
	var rng = Range("A1:A50");
	// 将所有符合条件的行拼在一起
	let rn = [...rng].filter(r=>/\D+/.test(r.Value2)) // 删除条件:内容非数字
		.map(r=>r.Row+':'+r.Row);
	// 一次性删除
	Range(rn.join(',')).Delete(xlShiftUp);
}

  • 2
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 打赏
    打赏
  • 0
    评论
抱歉,我是AI语言模型,无法提供大量代码。以下是一些WPS JS代码示例: 1. 计算选定单元格的总和 ```javascript function sumSelectedCells() { var sum = 0; var range = Wps.WpsApplication().ActiveWindow().CurrentSelection(); for (var i = 1; i <= range.Cells().Count; i++) { sum += range.Cells(i).Value(); } alert("选定单元格的总和是:" + sum); } ``` 2. 根据选定单元格的值,设置单元格背景颜色 ```javascript function setCellColor() { var range = Wps.WpsApplication().ActiveWindow().CurrentSelection(); for (var i = 1; i <= range.Cells().Count; i++) { var cellValue = range.Cells(i).Value(); if (cellValue < 0) { range.Cells(i).Interior.ColorIndex = 3; // 红色 } else if (cellValue > 0) { range.Cells(i).Interior.ColorIndex = 4; // 绿色 } } } ``` 3. 在选定单元格的右侧插入当前日期 ```javascript function insertDate() { var range = Wps.WpsApplication().ActiveWindow().CurrentSelection(); range.InsertAfter(new Date().toLocaleDateString()); } ``` 4. 根据选定单元格的值,设置单元格字体颜色 ```javascript function setFontColor() { var range = Wps.WpsApplication().ActiveWindow().CurrentSelection(); for (var i = 1; i <= range.Cells().Count; i++) { var cellValue = range.Cells(i).Value(); if (cellValue < 0) { range.Cells(i).Font.ColorIndex = 3; // 红色 } else if (cellValue > 0) { range.Cells(i).Font.ColorIndex = 4; // 绿色 } } } ``` 5. 在新的工作表中创建图表 ```javascript function createChart() { var newSheet = Wps.WpsApplication().ActiveWorkbook().Sheets().Add(); var chartRange = newSheet.Range("A1:B5"); chartRange.Value = [[1, 2], [3, 4], [5, 6], [7, 8], [9, 10]]; var chart = newSheet.Shapes().AddChart2(201, 3, 0, 0, 400, 300); chart.Chart.SetSourceData(chartRange); } ```

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

Excel_VBA创维大表格จุ๊บ

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值