打开APP
userphoto
未登录

开通VIP,畅享免费电子书等14项超值服

开通VIP
8、【WPS JS】批量汇总工作簿中的工作表
案例如下:


想把1月到5月的数据汇总到汇总表中去,每个月的数据格式都一样,数据如下:


最终效果展示如下:


代码如下:
function 多表汇总(){  var sht1=Sheets("汇总");  sht1.Range("a1:d1").Value2=["月份","工号","姓名","销售额"];  sht1.Range("a2:d"+sht1.UsedRange.Rows.Count).ClearContents()  for(var sht of Sheets){    if(sht.Name!="汇总"){      var maxr=sht.UsedRange.Rows.Count;      var lastrng=sht1.Cells(Rows.Count,2).End(3)(2,1);      sht.Range("a2:c"+maxr).Copy(lastrng);      var fisrtrng=sht1.Cells(Rows.Count,1).End(3)(2,1);      fisrtrng.Resize(maxr-1,1).Value2=sht.Name;    }  }}

本节主要学习:

1、工作表的UsedRange属性

2、单元格区域中内容的清除方法ClearContents

3、单元格区域的扩展方法End

4、单元格区域的重新确定Resize

以上代码除了语句结构外,其它知识点和VBA中基本一致。
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报
打开APP,阅读全文并永久保存 查看更多类似文章
猜你喜欢
类似文章
【热】打开小程序,算一算2024你的财运
Excel-VBA一键优化工作薄占用空间
(13) 查找最后单元格End()移动,Find()查找,UsedRange()已使用,CurrentRegion()扩展
以下是50个常用的VBA程序代码:
VBA常用案例【拿来吧你2】
Excel之VBA常用功能应用篇:使用VBA合并工作表
VFP取指定Excel表的行数和列数
更多类似文章 >>
生活服务
热点新闻
分享 收藏 导长图 关注 下载文章
绑定账号成功
后续可登录账号畅享VIP特权!
如果VIP功能使用有故障,
可点击这里联系客服!

联系客服