我的第一个自编的程序

jin2001h

      每天要从后台导10几个压缩文件，压缩文件的文档的名称是数字和字母的组合，要一个个解压打开，插入单元格，输入店名，再复制粘贴到一个工作表中去，重复做事，我听说Vba可以编个程序可以代替重复的工作，就动手编了这个程序，太难了，上学的时候英语就不好，看到一串串字母头就有点昏

，还好，坚持写了2天，有问题就查百度，连复制粘贴的代码都是网上查来的，代码复制粘贴就拼成了这个程序。肯定不完美，但给了我信心，网络时代学东西还是要容易点的。
      这个程序主要作用是合并同种压缩文件中的工作薄，并添加压缩文件名给各工作薄。

wanghan519

好用就行

其实这种又需要解压，又需要遍历的工作，用win10自带的powershell真的很方便，比如下图，试了向ai问怎么解压，再问怎么合并xlsx，回答的都很准确
然后写了两句，不知道理解的对不对，就是解压所有zip，然后合并所有xlsx
另外这个方法需要安装importexcel模块，也就是按win+r执行powershell后，运行install-Module importexcel

1. Get-ChildItem *.zip | % {Expand-Archive $_.FullName -DestinationPath .}
   
2. Get-ChildItem *.xlsx | % {Import-Excel $_.FullName} | Export-Excel -AutoSize out.xlsx

复制代码

jin2001h

wanghan519 发表于 2023-3-25 20:49
好用就行

其实这种又需要解压，又需要遍历的工作，用win10自带的powershell真的很方便，比如下图 ...

每天都要做的，我还是觉得用Excel表格顺手些，再先进些，我们都要失业了

苏阳湖wzy

真心不错！

洋务德雷

wanghan519 发表于 2023-3-25 20:49
好用就行

其实这种又需要解压，又需要遍历的工作，用win10自带的powershell真的很方便，比如下图 ...

这怎么玩，挺有意思

jeff_ps2009

这个确实不错，厉害~