题目: 打开文件读取sheet表名
Sub 打开文件读取工作表名()
Dim wb As Object
Dim sh As Object
Set wb = ThisWorkbook
For Each sh In wb.Worksheets '不能 in wb
Debug.Print sh.Name
Next sh
End Sub
不打开呢?
https://blog.csdn.net/taller_2000/article/details/88075998