WPS表格 JSA 学习笔记

置顶 已于 2024-05-28 22:04:09 修改
阅读量1.2w 收藏 158
点赞数 28
分类专栏： JavaScript Office+WPS 文章标签： jsa wps 表格
于 2021-10-09 21:53:57 首次发布
大家好，我是笨笨，笨笨的笨，笨笨的笨，转载请注明出处，谢谢！
本文链接：https://blog.csdn.net/jx520/article/details/120678065
版权

WPS表格 JSA 学习笔记

自定义公式

function 加括号(区域, 左括号, 右括号){
	return `${左括号}${区域}${右括号||左括号}`;
}

在这里插入图片描述

单元格拼接JSON

function jsonStr(rng){
	return `{"descp":"${rng.Cells.Item(1,1).Value2}","name":"${rng.Cells.Item(1,2).Value2}","key":"${rng.Cells.Item(1,3).Value2}"},`;
}

单元格内文字颜色

function test(){
	var len = Range("A1").Value2.length;
	for(let i = 1; i<=len; i++){
		Range("A1").Characters(i,1).Font.ColorIndex = i+7;
	}
}

在这里插入图片描述

引用系统自带公式

注意：这里是代码中引用系统自带公式，是直接拿公式结果来用。如果想在单元格里设置公式看设置公式，别搞混淆了。

Transpose

WorksheetFunction.函数名(参数...);

function test1(rng){
	return rng.Value2.join();
}
function test2(rng){
	var arr = WorksheetFunction.Transpose(rng); // 通过转置函数，得到按行读的数据
	return arr.join();
}

在这里插入图片描述
在这里插入图片描述

VLookup

注意参数类型，VLookup的前两个参数，传的都是单元格引用。

function 引用公式(){
	Range('D1').Value2 = WorksheetFunction.VLookup(Range("C1"), Range("A:B"), 2, false);
}

Sheet 工作表

创建工作表

在这里插入图片描述

/** 创建新表放在开头 */
function addFirst(sheetName = '工作表'){
	Sheets.Add(Worksheets.Item(1)).Name = `${sheetName}${Worksheets.Count}`;
}
/** 创建新表放在末尾 */
function addLast(sheetName = '工作表'){
	Sheets.Add(undefined, Worksheets.Item(Worksheets.Count)).Name = `${sheetName}${Worksheets.Count}`;
}
/** 在当前表左侧添加 */
function addPrev(sheetName = '工作表'){
	Sheets.Add().Name = `${sheetName}${Worksheets.Count}`;
}
/** 在当前表右侧追加 */
function addNext(sheetName = '工作表'){
	Sheets.Add(undefined, ActiveSheet).Name = `${sheetName}${Worksheets.Count}`;
}

function main(){
	addPrev();  Application.Worksheets.Item("Sheet1").Select();
	addNext('摸鱼表');
	addFirst('加班表');
	addLast('下班表');
	alert("确认后将删除刚才创建的表。");
	let sheetsName = Array.from(Sheets).filter(sh=>sh.Name!="Sheet1").map(sh=>sh.Name);
	Application.Sheets.Item(sheetsName).Delete();
}

工作表引用

function tes1t(){
   Application.Worksheets.Item(1).Cells.Item(1, 1).Value2 = "按索引取工作表s1";
   Range("A2").Value2 = "当前活动区域赋值s1";
   
   Application.Worksheets.Item("Sheet1").Cells.Item(1, 2).Value2 = "按名称取工作表s1";
   Cells.Item(2, 2).Value2 = "当前活动单元格赋值s1";
}

Cells 单元格

单元格引用

Cells(行序号, 列序号)
获取第1行第1列，并选中

Cells.Item(1, 1).Select();

获取第3行第3列，并选中。Item是VBA思想，去掉也是可以的。

Cells(3, 3).Select();

Range 范围

单元格引用

function tes1t(){ 
   Application.Worksheets.Item("Sheet2").Activate();
   Range("A1").Value2 = "当前活动区域赋值s2";
   Cells.Item(1, 2).Value2 = "当前活动单元格赋值s2";
}
  • 选中A1:H8范围
Range("A1:H8").Select();
  • 选中第1行第1列到第3行第3列，也就是范围：A1:C3
Range(Cells(1, 1),Cells(3, 3)).Select();

填写公式

A1:H8范围内，每个单元格都填充公式Rand()

function test(){
    Application.Worksheets.Item("Sheet1").Activate();
	Application.Range("A1:H8").Formula = "=Rand()";
}

单元格赋值

注意：使用Value2

function test(){
	Application.Range("A1:H1").Value2 = "666";
}

A1:E1区域赋值

function test(){
	Range("A1:E1").Value2 = [1,2,3,4,5] ;
}

遍历

遍历 Range 打印值

function test(){
	var rng = Range("A1:A20");
	for(v of rng){
		Console.log(v.Value2)
	};
}

按目标单元格背景颜色对指定 Range 求和

这是个自定义公式，可以直接用了

/**
 * 按目标单元格背景颜色对指定 Range 求和
 * @param rng 		求和区域
 * @param target	目标单元格
 */
function sumByBgColor(rng, target){
	let tc = target.Interior.Color;		// 取目标单元格颜色。
	return Array.from(rng)				// rng转标准数组。这里的 range 应该只是个类数组对象
		.filter( c => c.Interior.Color == tc)	// 筛选颜色相同单元格
		.reduce((a, c, i) => a + c.Value2 , 0);	// 合计
}

遍历Range处理单元格内容

给 A1:A20 的内容加个括号

function 遍历Range加括号(){
	var rng = Range("A1:A20");
	rng.Value2 = rng.Value2.map(v => {
		return `【${v}】`;
	});	
}

for(v of rng){

遍历Range处理单元格颜色

给 A1:A20 改背景色

function 遍历Range改背景色(){
	var rng = Range("A1:A20");

	Array.from(rng).forEach(v => {
		(obj=>{
			obj.Color = 5296274;
		})(v.Interior);
	});
}

遍历Range加批注

function 遍历Range加批注(){
	var rng = Range("A1:A20");
	let len = rng.Count;
	
	for(let i=1; i<=len; i++){
		let obj = rng.Cells.Item(i,1);
		obj.ClearComments();
		obj.AddComment(Date.now().toString());
	}
}

遍历Range加批注(带背景图)

function 遍历Range加带背景图的批注(){
	var rng = Range("A1:A5");
	let len = rng.Count;
	
	for(let i=1; i<=len; i++){
		let obj = rng.Cells.Item(i,1);
		obj.ClearComments();
		obj.AddComment(Date.now().toString()); // 批注内容为时间戳
		obj.Comment.Shape.Fill.UserPicture(`${Application.ActiveWorkbook.Path}\\img\\WPS-${i}.jpg`); // 批注添加背景图片 .\img\WPS-*.jpg
	}
}

批量删除行

/**
 * 拼Range
 */
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);
}

数组转置

目前WPS有点反人类。取的时候按列，存的时候按行。。。精神分裂。。。
在这里插入图片描述
在这里插入图片描述

function test(){
	let arr = Range("A1:C3").Value2; //取出 range 
	Console.log(JSON.stringify(arr)); // [[1,4,7],[2,5,8],[3,6,9]]
	arr = arr[0].map((_, colIndex) => arr.map(row => row[colIndex]));  // 数组转置
	Console.log(JSON.stringify(arr)); // [[1,2,3],[4,5,6],[7,8,9]]
}
  • 使用例子：
function getArr4Range(rng){
	let arr = rng.Value2; //取出 range 
	return arr[0].map((_, colIndex) => arr.map(row => row[colIndex]));  // 数组转置
}

function setArr4Range(rng, arr){
	arr.forEach( (v,i) => rng.Rows.Item(i+1).Value2 = v );
}

function test(){
	let rngData = getArr4Range(Range("A1:C3"));
	Console.log(JSON.stringify(rngData));
	
	let arr = [[1,2,3],[4,5,6],[7,8,9]];
	setArr4Range(Range("E1:G3"), arr);
}

Range(Cells(1, 1),Cells(3, 3)).Select();

Selection 选区

function test(){
	Range("A1:E5").Select(); 			// 选中 A1:E5 区域
	var arr = [...Selection.Value2];	// 获取当前区域的值，并解构成数组
	Console.log(JSON.stringify(arr,null,2)); 
}

得到：

[
	["a1","b1","c1","d1","e1"],
	["a2","b2","c2","d2","e2"],
	["a3","b3","c3","d3","e3"],
	["a4","b4","c4","d4","e4"],
	["a5","b5","c5","d5","e5"]
]

Columns 列

删除所有隐藏列

function deleteHiddenColumns(){
	[...Columns]
		.map(col => col.EntireColumn)
		.filter(col => col.EntireColumn.Hidden)
	 	.forEach(col => col.Delete(xlShiftToLeft));
}

遍历单元格

Sheet 范围内遍历

嵌套循环输出乘法口诀表

function test(){
    Application.Worksheets.Item("Sheet1").Activate()
    for(let i = 1; i <= 9; i++){
	    for(let j = 1; j <= 9; j++){
	        Application.Cells.Item(i, j).Value2 = i*j;
	    }
    } 
}

Range 范围内遍历

嵌套循环输出乘法口诀表
这里的i,j表示range范围内的偏移量

function test(){
    Application.Worksheets.Item("Sheet1").Activate()
    let rng = Range("C5:P20");
    for(let i = 1; i <= 9; i++){
	    for(let j = 1; j <= 9; j++){
	        rng.Cells.Item(i, j).Value2 = i*j;
	    }
    } 
}

设置公式

在C2单元格创建一个公式：在A列查找a2并返回B列对应的值。

Range('C2').Formula = '=VLookup("a2",A:B,2,false)';

参考资料

湖边的小屋圣迹：Excel、Word VBA 学习笔记

WPS 开放平台
WPS 开放平台 - 客户端开发

WPS 宏编辑器概述
WPS 表格：自定义函数
从Visual Basic Script 转到 JavaScript
在这里插入图片描述

笑虾
关注
专栏目录
WPS JS宏从入门到放弃（JSA/JS宏编程教程）
01-13
适合人群：零基础学习，希望使用编程来批量处理Excel数据 希望使用WPS编程来处理Excel数据 希望使用比VBA更简洁的编程语言来处理Excel数据 办公环境只有WPS，但又希望有像VBA一样的编程功能你将会学到：使用WPS中的JS宏代码，快速简洁的批量处理Excel和WPS 表格数据。课程简介：第01章 WPS表格基础与JS宏基础（已完成）第02章 JS宏循环语句应用（已完成）第03章 WPS表格常用对象应用（已完成）第04章 自定义函数（已完成）第05章 WPS JS宏数组技术（已完成）第06章 WPS JS宏集合技术（已完成）第07章 WPS JS宏映射技术-Map（已完成）第08章 WPS JS宏对象应用（已完成）第09章 JS宏正则表达式（已完成）第10章 工作簿与程序应用事件（已完成）第10章 JS宏窗体控件 （已完成） 
JSA压缩javascript
03-14
JSA 压缩 javascript
WPS宏实现对表格选中区域数据进行遍历读取及动态赋值
最新发布
金豆呀的博客
08-08 669
/console.log("选中区域的地址："+h);//console.log("选中区域的值："+f);//选中区域后22列及前9列单元格的地址。赋值用的是Formula属性，这个可以写公式。//3、获取当前选中区域有多少行和多少列。//2、获取当前选中区域的首行和首列。//6、双重FOR循环组装行列号。//5、选中区域的行号放进数组。//4、选中区域的列号放进数组。//1、作用于Sheet1页。VBA中好像可以直接用。
wps的jsa宏-定时-每10秒钟保存一次
陈表达的博客
05-19 421
wps的jsa宏-定时-每10秒钟保存一次。研究了挺久的，分享一下。
WPS表格 JSA 学习笔记 - 实现【设置编号】并添加到自定义选项卡
灵台方寸山斜月三星洞
01-07 1865
准备：先创建一个自定编号。 先全选全文，取消编号。 将标定在最开始。 执行以下方法。 function 遍历所有标题设置编号() { var flag = 0; var t = Selection.GoTo(wdGoToHeading, wdGoToNext, 1, ""); // 关闭屏幕更新,提升执行效率 // Application.ScreenUpdating = false; while (flag != t.End) { // 记住当前位置 flag = t.End; .
WPS表格 JSA 实例收集
灵台方寸山斜月三星洞
02-28 1445
形状 Shapes 删除所有Shape对象 function 删除所有Shape对象(){ [...ActiveDocument.Shapes].slice(0,9999).forEach(shap =>{ Console.log(`删除形状：${shap.ID}`); shap.Delete(); }); Console.log(`删完成`); }
WPS-JSA-贪吃蛇.et
10-19
WPS-JSA-实现的贪吃蛇。https://jerryjin.blog.csdn.net/article/details/120843954 欢迎加入QQ群交流JSA技术 551293360
WPS JSA 宏脚本入门和样例
Alf的专栏
06-07 2470
WPS window版本才支持JSA宏的功能。可以自动化的操作文档中的一些内容。参考文档：有问题，基本查看上面的两个文档，再加上百度搜索，就差不多了。
WPS表格 JSA 学习笔记 - 实现贪吃蛇
灵台方寸山斜月三星洞
10-19 2176
let snake = Range("Y25:Y30");// 蛇身显示 let arr = []; // 蛇身数据 let toggle = false; // 总开关 let totalScore = 0; // 总得分 let scoreCount = 0; // 目标 let area = Range("B2:AY51"); // 活动区域 let scoreArea = Range("BA1"); // 记分区域 let snakeColor = '00FF00'; // 蛇颜色 let sco.
WPS文字 JSA 学习笔记 - 批量设置表格
灵台方寸山斜月三星洞
01-07 2660
WPS表格 JSA 学习笔记 - 批量设置表格创建表格样式批量设置表格返回当前表格索引参考资料 创建表格样式 function 创建表格样式(styleName = "表格") { try{ ActiveDocument.Styles.Item(styleName).Delete(); }catch(e){ Console.log("样式不存在"); } ActiveDocument.Styles.Add(styleName, wdStyleTypeParagraph); (obj=&gt
WPS的JSA算国产编程语言,IDE，脚本工具吗？javascript代替VBA
06-04 708
在JavaScript中，你不能直接将赋值操作（如 excelAPP('value1', 'value2') = "new value"）作为函数调用的一部分来执行，因为这会违反JavaScript的语法规则。// 或者 key1 + '.' + key2。// 或者 key1 + '.' + key2。如何实现用js实现：excelAPP('value1', 'value2')="new value"// setValue方法用于设置数据对象的属性。// 使用excelAPP对象来获取值。
原js笔记
Pwsifeng的博客
01-10 2547
s原生JS笔记 电话：17339853876（微信同号） 二阶段学习内容 1、B/S架构（web结构） [外链图片转存失败,源站可能有防盗链机制,建议将图片保存下来直接上传(img-4LYi0Arv-1641803458638)(img1628929434621.png)] 2、前端工程师的工作 人机交互 前后端交互 3、HTML、CSS、JS的作用和关系 一个网页由三部分组成：HTML、CSS、Javascript HTML： 结构（静态） [外链图片转存失败,源站可能有防盗链
android 去重 比较两个list_Android 去除list集合中重复项的几种方法
weixin_39713686的博客
12-21 1412
因为用到list，要去除重复数据，尝试了几种方法。记录于此。。。测试数据：List li1 = new List { "", "", "", "" ,"",""};List li2 = new List { "张三", "张三", "李四", "张三", "王五", "李四" };List li3 = new List { "A", "A", "C", "A", "C", "D" };List l...
android 去重 比较两个list_android 去重 比较两个list_Android 去除list集合中重复项的几种方法...
weixin_31342203的博客
03-03 1019
因为用到list，要去除重复数据，尝试了几种方法。记录于此。。。测试数据：List li1 = new List { "", "", "", "" ,"",""};List li2 = new List { "张三", "张三", "李四", "张三", "王五", "李四" };List li3 = new List { "A", "A", "C", "A", "C", "D" };List l...
PHP 面试知识点整理归纳
热门推荐
PHP学习日志——地雷
09-05 1万+
全文已整理补充完毕，以后还会继续更新文章里面的错误，以及补充尚不完善的问题。 该篇文章是针对Github上wudi/PHP-Interview-Best-Practices-in-China资源的答案个人整理 lz也是初学者，以下知识点均为自己整理且保持不断更新，也希望各路大神多多指点，若发现错误或有补充，可直接comment，lz时刻关注着。 由于内容比较多，没有直接目录，请自行对照 Gi...
爬虫教程（ 1 ） --- 初级、基础、实践
墨鱼菜鸡
07-11 2994
爬虫教程：https://piaosanlang.gitbooks.io/spiders/content/ 如何入门 Python 爬虫：https://zhuanlan.zhihu.com/p/21479334 静觅 崔庆才的个人博客 Python 爬虫系列：http://cuiqingcai.com/category/technique/pyth...
在WPS表格里制作连接到openGauss的实时刷新报表
Gauss松鼠会
01-17 2184
数据库与excel结合出的报表实现。
WPS表格 JSA 学习笔记 - 批量设置图片
灵台方寸山斜月三星洞
01-07 1557
function 创建图片样式(styleName = "图片") { try{ ActiveDocument.Styles.Item(styleName).Delete(); }catch(e){ Console.log("样式不存在"); } ActiveDocument.Styles.Add(styleName, wdStyleTypeParagraph); (obj=>{ obj.Alignment = wdAlignParagraphCenter; // 居中 o.
WPS文字 JSA 学习笔记 - 设置自定义编号
灵台方寸山斜月三星洞
01-09 925
function 创建自定义编号(){ // 遍历1到9级 var nf = "%1、%2.%3.%4.%5.%6.%7.%8.%9."; var arr = [...ListGalleries.Item(4).ListTemplates.Item(1).ListLevels]; // 取自定义第一个进行设置 arr.forEach((obj,i)=>{ var n = i+1; obj.NumberFormat = nf.substring(0, n*3); // 列表级别的数
wps表格 js宏 批量插入批注
07-23
你可以使用WPS表格的JavaScript宏来实现批量插入批注的功能。以下是一个简单的示例代码： ```javascript function insertComments() { var sheet = SpreadsheetApp.getActiveSpreadsheet().getActiveSheet(); var range = sheet.getDataRange(); var values = range.getValues(); for (var i = 0; i < values.length; i++) { var row = values[i]; for (var j = 0; j < row.length; j++) { var cellValue = row[j]; var commentText = '批注内容'; // 替换为你想要插入的批注内容 sheet.getRange(i + 1, j + 1).setComment(commentText); } } } ``` 你可以将上述代码保存为一个JavaScript宏，然后在WPS表格中运行该宏。它将遍历当前活动表格的所有单元格，并在每个单元格上插入指定的批注内容。请记得将`批注内容`替换为你实际希望插入的内容。 希望对你有所帮助！如有任何问题，请随时提问。
评论 10
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

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

打赏作者

笑虾

多情黯叹痴情癫。情癫苦笑多情难

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

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

打赏作者

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

抵扣说明：

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

余额充值