WPS宏学习实践
文章平均质量分 66
jsa其实就是js的环境+vab的代码,用起来其实挺费劲的。。。
金豆呀
立志大牛!
展开
-
WPS宏关于Range.Find方法的使用
在反引号内,你可以使用${}`来包裹任何有效的JavaScript表达式,这些表达式的结果会被转换成字符串并嵌入到最终的字符串中。var arr = ['甲烷:CH4', '乙烯:C2H4', '乙烷:C2H6', '乙炔:C2H2', '氢气:H2', '一氧化碳:CO', '二氧化碳:CO2'];//根据气体名称找到对应的单元格,循环第一次进入cellToFill的值是R2。//切割要查找的值,找到一个就算。//定义找到后的值放到哪里。//开始遍历一行一行的查。//定义要在区域找的值。原创 2024-08-30 10:55:41 · 375 阅读 · 0 评论 -
WPS宏实现表格批量插入多行
在Excel VBA中,Insert方法用于在指定的行之前插入新的行。//2、统计表格有多少行数据,用于for循环控制次数,End(xlDown):一直向下直到空单元格停止。//3、Insert()方法只能插入1行,写for循环,插几行就循环几次,先插入两行用于后面copy。//选择框下移5行,插入复制的A5、A6行,原有的行向下移动。Console.log("隔3插2要插:"+b+"次");Console.log("表格有:"+a+"行数据");//5、设置for循环条件,开始循环插入2行。原创 2024-08-07 16:04:45 · 406 阅读 · 0 评论 -
WPS宏实现对表格选中区域数据进行遍历读取及动态赋值
/console.log("选中区域的地址:"+h);//console.log("选中区域的值:"+f);//选中区域后22列及前9列单元格的地址。赋值用的是Formula属性,这个可以写公式。//3、获取当前选中区域有多少行和多少列。//2、获取当前选中区域的首行和首列。//6、双重FOR循环组装行列号。//5、选中区域的行号放进数组。//4、选中区域的列号放进数组。//1、作用于Sheet1页。VBA中好像可以直接用。原创 2024-08-08 15:54:55 · 614 阅读 · 0 评论 -
WPS宏实现一个表格拆分成多个表格的功能
表格存储各个省的信息,江苏的有50行数据,山西的55行数据等等,这个就是把江苏的创建一个新表保存,山西的创建一个新表格保存。里面主要是表格的创建与关闭相关知识,还有动态给表格对象赋值,实现循环操作表格的目的。//删除源表格Sheet2页,设置不弹出是否删除的提示框,执行删除完毕后开启。//Sheet1页首列复制到Sheet2页并去重。//Sheet1页复制到其他表格Sheet1页。//D盘下面创建名为test的文件夹。//遍历Sheet2页值创建其余表格。//获取其他页数据及地址。//遍历删除各个地市。原创 2024-08-20 10:15:06 · 562 阅读 · 0 评论 -
WPS宏实现Sheet页拆分功能
源表格首列复制导致Sheet2页,根据去重后的值创建新的Sheet页,把源表格数据复制到新建的Sheet页,遍历删除不需要的留下需要的就完成了。//删除源表格Sheet2页,设置不弹出是否删除的提示框,执行删除完毕后开启。//Sheet1页首列复制到Sheet2页并去重。//遍历Sheet2页值创建其余Sheet页。//Sheet1页复制到其他页。//获取其他页数据及地址。原创 2024-08-20 10:25:13 · 410 阅读 · 0 评论 -
WPS宏获取表格选中区域实现多列重复值删除
第二版是既能单列删除也能多列删除,Selection对象代表窗口或窗格中的当前所选内容,每个文档窗格只能有一个Selection对象,并且在整个应用程序中只能有一个活动的Selection对象。第一版是单列删除,ActiveCell返回一个 Range 对象,该对象代表活动窗口的活动单元格,注意区分活动单元格和选定区域。//console.log("所选区域的列数:"+a);//console.log("所选区域的地址:"+e);//console.log("选中区域首行:"+a);原创 2024-08-07 09:27:21 · 454 阅读 · 0 评论 -
WPS表格宏实现动态时钟
/2秒后调用本方法,就是自己调用自己,秒数每2秒跳一次。//单元格赋值为当前时间。不知道说啥,直接上代码。//设置当前时间+2秒。原创 2024-08-05 10:29:26 · 295 阅读 · 0 评论 -
WPS宏模拟vlookup函数功能
var rst1 = InputBox("请输入比对列的Sheet页及列号、被比对列的Sheet页及列号、返回值的列号被用','隔开:");var rst1 = InputBox("输入比对列的Sheet页及列号、被比对列的Sheet页及列号用','隔开:");console.log("结束时间:" + new Date().toLocaleString());console.log("结束时间:" + new Date().toLocaleString());原创 2024-08-15 15:26:36 · 424 阅读 · 0 评论 -
WPS表格宏实现定时任务逐时间展示照片
//Font属性设置字体、大小、加粗等 Range("A1:S10").Font.Name="宋体"; Range("A1:S10").Font.Size=26; Range("A1:S10").Font.Bold=true; //设置控制照片展示字体颜色,与表格背景色一致 Range("A1:I10").Font.ThemeColor=3; //设置字体居中 Range("A1:S10").HorizontalAlignment = xlHAlignC原创 2024-08-08 17:13:52 · 843 阅读 · 0 评论 -
WPS宏实现表格合并功能
newWork.SaveAs(folderPath+"\\"+"合并表格"+".xlsx");// 获取下一个文件,Dir()方法不给任何参数,默认去找下一个匹配的文件。alert("合并完成,合并表格与要合并的表格同目录下");//创建合并表格,如果合并文件存在会报错,这里没做校验删除。alert("文件为空,无法执行");//默认合并每个表格的Sheet1页。//合并文件为C盘下面名为test的文件夹。//获取合并页的有多少行。function 合并表格() {//保存合并表格至原文件夹。原创 2024-08-21 14:49:44 · 730 阅读 · 0 评论 -
WPS宏实现Sheet页合并功能
/console.log("第"+i+"个"+"Sheet页名称:"+sheetName);//创建名称为 合并页 的Sheet页,如果存在名称叫合并页的Sheet页,这里会报错,没做判断删除。//console.log("Sheet页数量:"+sheetNum);//每个Sheet页从第二行开始复制。//这里i从2开始,把新创建的合并页抛出去。function 合并Sheet页() {ws1.Name = "合并页";//获取合并页的有多少行。//获取所有Sheet页对象。//先把表头复制过去。原创 2024-08-20 20:16:50 · 447 阅读 · 0 评论 -
WPS宏关于时间格式值的读取与比对
之前对表格单元格的读取及赋值用Range对象的Value2或Formula 属性,获取表格区域值的时候用Value() 方法获取,对于日期格式Value2或Formula 属性获取到的都是日期数字,还转换不过来,用Value() 方法读取单个单元格成功拿到日期,Value().toLocaleString();//对于时间比较,这里只能用Value()去获取值,用toISOString()去格式化时间,剩下的都是不对的,我试了一天。ws1.Cells.Item(yy,12).Value2 = "是";原创 2024-08-20 09:58:55 · 530 阅读 · 0 评论