1、打开excel文件，里面有几十个Sheet页，以部门命名
2、点击“新工作表”按钮，新建一个Sheet页，将新增的Sheet表移到第一个。
3、点击Sheet1中任意一个单元格，点击“公式->定义名称”。其中名称设置为“A”，引用位置为“=GET.WORKBOOK(1)”
4、选中C列，作为Sheet名称存放的列，输入公式“=TRANSPOSE(A)”，之后按键CTRL+SHIFT+ENTER后，Excel文件中的Sheet页名称就列举在C列了
5、复制C列，然后在C列粘贴值，去掉公式
6、按键CTRL+F打开查找和替换界面，将Excel文件名信息"[部门目录.xlsx]"替换成空
7、将无用的Sheet名称信息（如Sheet1、#N/A）删除，增加部门表头
