VB6.0 获取Excel文件工作表Sheet的名称
获取Excel文件工作表Sheet的名称
1 '产生Excel文档 2 Dim xlapp, xlbook As Object 3 Dim sSheetName As String 4 Set xlapp = CreateObject("Excel.Application") 'Excel对象 5 Set xlbook = xlapp.Workbooks.Open(Me.txtFileName.Text) '打开已经存在的EXCEL文件 6 xlapp.Visible = False '设置EXCEL对象可见(或不可见) 7 xlapp.DisplayAlerts = False 8 sSheetName = xlbook.Worksheets(1).Name '获取工作表的名称 9 10 '释放资源 11 xlbook.Close 12 xlapp.Quit
作者:Anne Han
出处:https://www.cnblogs.com/AnneHan
GitHub:https://github.com/AnneHan
如果您看了本篇博客,觉得对您有所收获,请点击右下角的 [推荐]
如果您对本文有意见或者建议,欢迎留言
本文版权归作者和博客园共有,欢迎转载,但未经作者同意必须保留此段声明,且在文章页面明显位置给出原文连接,否则保留追究法律责任的权利。