VB中excel的应用

来源：百度知道 编辑：UC知道 时间：2024/06/01 10:59:42
在“工程”菜单中选“引用”后选“了Microsoft excel 11.0 objiect library”后，编写的指教程序时总是说dim xlapp as excel.application是错。提示说：用户定义类型未定义。请那位高手哈？
那句我加了还是弹出以上问题，谢谢

加一句试试
Set xlapp=CreateObject("Excel.Application")
下面是一段我编的程序中的代码，希望对你有帮助
Dim xlapp As Excel.Application
Dim xlbook As Workbook
Set xlapp = CreateObject("Excel.application")
xlapp.DisplayAlerts = False
Set xlbook = xlapp.Workbooks.Open(ListFile.List(I))
Call FmtField(xlbook)
xlbook.SaveAs App.Path & "\" & Dir(ListFile.List(I)), xlCSV
xlbook.Close False
Set xlbook = Nothing
xlapp.DisplayAlerts = True
Set xlapp = Nothing