VBA，如何知道一共打开了多少工作薄？及索引号1

发布网友发布时间：2023-10-24 15:38

共1个回答

热心网友时间：2024-12-14 23:26

Sub 遍历所有excel文件()
Dim Owin, arr()
        For Each Owin In Workbooks
             s = s + 1
             ReDim Preserve arr(1 To s)
             arr(s) = Owin.Name
        Next
        MsgBox Join(arr, "【】")
End Sub

试试看这个

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com