VBA
@小时候可乖了@
乐于分享 笔耕不辍
展开
-
VBA将一个表格拆分成多个新表格
背景:业务给了一个大表格,里面几十万条数据,要拆分成成百上千个小表格,思来想去,vba做这件事是效率最高的。样表数据源:请按照这个表头在excel中制作样表(最好将样表放在一个空文件夹里面)然后调出VB编辑器,输入如下代码运行Sub 按A列区分内容并拆分到新表格()Dim i%arr = Sheets(1).[a1].CurrentRegionSet d = CreateObject("scripting.dictionary")For i = 2 To UBound(arr)原创 2021-04-21 10:03:36 · 4084 阅读 · 3 评论 -
VBA合并当前excel所在文件夹的所有表格
将要合并的文件放在同一个文件夹里面testing1、testing2、testing3表格里面内容:运行下述代码后,合并内容如下:Sub 合并当前目录下所有工作簿的全部工作表()Dim MyPath, MyName, AWbNameDim Wb As Workbook, WbN As StringDim G As LongDim Num As LongDim BOX As StringApplication.ScreenUpdating = FalseMyPath = Acti原创 2021-03-02 17:21:58 · 1080 阅读 · 2 评论