以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何取得EXCEL报表的SHEET名称  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=68040)
--  作者：南望
--  发布时间：2015/5/8 13:09:00
--  如何取得EXCEL报表的SHEET名称

如何取得EXCEL报表的SHEET名称？


For Each file As String In filesys .GetFiles("c:\\Data")
    If file.EndsWith(".xls") OrElse file.EndsWith(".xlsx") Then
        Dim Book As New XLS.Book(file)
        output.show(sheet名称）
    End If
Next
--  作者：Bin
--  发布时间：2015/5/8 13:46:00
--  
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Messagebox.SHow(Sheet.Name)
--  作者：南望
--  发布时间：2015/5/8 14:14:00
--  
谢谢。
另外再问一下：如何在处理EXCEL时弹出一个交互窗口，输入一个数值后程序继续执行？

if Sheet1.Rows.Count =16384 then
   For j As Integer = 0 To 弹出窗口输入一个数值
代码
   Next
end if
--  作者：Bin
--  发布时间：2015/5/8 14:14:00
--  
http://www.foxtable.com/help/topics/2063.htm