1. 首页 / 帮助

365天存钱法表格打印(365天存钱法表格下载)

365天存钱法表格打印,365天存钱法表格下载相信很多小伙伴还不知道,现在让我们一起来看看吧!

1、365确实有点多,手工复制很累的,可以写宏来复制。

2、例如下面的代码:Option ExplicitSub YgB()    Dim st As Worksheet, stNew As Worksheet, i    Workbooks.Add    Set stNew = ActiveSheet    i = 1    For Each st In ThisWorkbook.Sheets       stNew.Cells(i, 1) = ***.Name       st.UsedRange.Copy stNew.Cells(i, 2)       i = stNew.UsedRange.Rows.Count + 1    Next stEnd Sub测试的原始文件(两个表):生成的新文件:。

本文就为大家分享到这里,希望小伙伴们会喜欢。

本文由'一条小恨烟'发布,不代表演示站立场,转载/删除联系作者,如需删除请-> 关于侵权处理说明