方法一：
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=101056&replyID=694684&skin=1
方法二：用xls.book打开文件以后，取第一个sheet即可，如
Dim Book As New XLS.Book("d:\test.xls")msgbox(book.sheets(0).name)
加好友 
发短信
Post By：2018/9/25 14:54:00 [显示全部帖子]
