Excel批量导出工作簿,并以单元格内容命名

2025-04-09 08:07:30

1、首先,打开Excel2007,打开开发工具,打开VBA编辑器。

Excel批量导出工作簿,并以单元格内容命名

2、然后,在左侧菜单中,插入新模块。

Excel批量导出工作簿,并以单元格内容命名

3、然后,查看要读取的单元格位置,如姓名位于b列。

Excel批量导出工作簿,并以单元格内容命名

4、然后,输入代码:

Excel批量导出工作簿,并以单元格内容命名

5、Sub 任意字符()r = 2Do While Sheets("挢旗扦渌;Sheet1").Cells(r, 媪青怍牙"a") <> ""Sheets("Sheet2").Cells(2, "b") = Sheets("Sheet1").Cells(r, "a")Sheets("Sheet2").CopySet wb = ActiveWorkbookwb.SaveAs "C:\Users\Administrator\Desktop\新建文件夹 (3)\" & Sheets("Sheet2").Cells(2, "b") & ".xlsx"wb.Closer = r + 1LoopEnd Sub例子中,使用了循环,将sheet1中的姓名填入了sheet2中的Cells(2, "b")所以,我们直接读取的Cells(2, "b")来命名。

Excel批量导出工作簿,并以单元格内容命名

6、最后,运行程序,即可达到,导出工作表格并以单元格内容命名。

Excel批量导出工作簿,并以单元格内容命名
声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
猜你喜欢