循環瀏覽文件夾中的excel文件並打開它而不參考文件名

Question

我想遍歷文件夾中的excel文件並提取信息。 我的問題是我的excel文件的文件名是越南語，所以當我使用Dir函數循環時，它不起作用。 如何遍歷文件夾中的文件並打開它們，而無需特別引用名稱。

我也嘗試了GetFolder方法，但它似乎也不起作用。

謝謝你的幫助。

Sub LoopThroughFiles()
   Dim MyObj As Object, MySource As Object, File As Variant
   Dim wb As Workbook
   Set MySource = MyObj.GetFolder("C:\Excel")
   For Each File In MySource.Files
        Set wb = Worksbooks.Open(File)
   Next File
End Sub

Answer 1

看起來您有MyObj的DIM，但是在使用它之前不對其進行初始化。 您可能應該有一個SET MyObj =某物