VBA读取工作表的小问题

Question

FileName = Application.GetOpenFilename("Excel文件（*.xls & .xla）,.xls;*.xla", , "VBA")
Set xlBook = app.Workbooks.Open(FileName)
For Each Sheet In xlBook.Worksheets
省略
Next

我想要的是，遍历一个指定的工作簿里的所有工作表，用每个sheet做一些操作
但是，明明第一句确实得到了路径，但第二句set，老是无法获得到工作簿对象来遍历
我不太懂vba，这个应该是个小问题吧？

Answer 1

Set xlBook = app.Workbooks.Open(FileName)

==>
Set xlBook =Application.Workbooks.Open(FileName)

或直接去掉app.