如何用批处理把多个Excel中的表名用txt显示出来

Question

我有个文件夹里面有多个Excel表，每个表都有好的sheet，我想把每个Excel中的sheet名字在文本上显示，这样我就知道哪个sheet在哪个Excel表中，下次修改就知道在哪个Excel表

Answer 1

tree或者dir命令　，重定向输出，是否可行？

Answer 2

这个是可以实现的，做个循环，打开工作簿，然后取得工作表名，写入txt不过看你要这样的话，说明你的表做的很有问题，还得这么去记，影响效率你可以一个工作表存一个工作簿，然后要找的时候everything软件直接搜索一下就行了

Answer 3

请用autoit写代码，很简单的实现

Answer 4

效仿隔壁Runnerchin的回复
alt + f11打开vba的ide，切换到"Thisworkbook"里，粘贴下面的代码Private Sub GetAllSheetName()
Dim Idx As Integer
  Idx = 1
  For Each wkst In ThisWorkbook.Sheets
      ActiveSheet.Cells(Idx, 1) = wkst.Name
      Idx = Idx + 1
  Next
End Sub应该会把当前Excel文件的所有Sheets全部导出, 辅以文件名可以得到
Sheet名称速查表