wps文字办公技巧填充(WPS JS宏批量填充模板)
- 办公技巧
- 2023-08-14 23:40:25
- 0
我们有一个工作簿,其中有两个Sheet,一个是数据表,一个是模板表,现在想根据数据表循环数据,根据模板生成所有的填充表。
具体效果和代码如下所示
数据表
模板表
效果表
代码如下:
function 批量填充模板(){for(var i=1;i<6;i ){/*此示例复制工作表 Sheet1,并将其放置在工作表 Sheet3 之后。*/ Worksheets.Item("样表").Copy(null, Application.Worksheets.Item("样表"))var bianHao=Sheets.Item("总表").Range("A2").Offset(i,0).Value()//给新建的样表命名 ActiveSheet.Name=bianHao//mm=new String(Sheets.Item("总表").Range("A2").Offset(i,0).Value2)ActiveSheet.Range("B4").Value2=Sheets.Item("总表").Range("A2").Offset(i,0).Value()ActiveSheet.Range("E4").Value2=Sheets.Item("总表").Range("B2").Offset(i,0).Value()ActiveSheet.Range("G4").Value2=Sheets.Item("总表").Range("C2").Offset(i,0).Value()ActiveSheet.Range("I4").Value2=Sheets.Item("总表").Range("D2").Offset(i,0).Value()ActiveSheet.Range("G5").Value2=Sheets.Item("总表").Range("E2").Offset(i,0).Value()ActiveSheet.Range("I5").Value2=Sheets.Item("总表").Range("F2").Offset(i,0).Value()}}
当然,本代码只是为了抛砖引玉,其中还写的不够灵活不够优美,希望对您有所帮助。
本文由 京廊文化根据互联网搜索查询后整理发布,旨在分享有价值的内容,本站为非营利性网站,不参与任何商业性质行为,文章如有侵权请联系删除,部分文章如未署名作者来源请联系我们及时备注,感谢您的支持。
本文链接: /bangong/15290.html