VB6.0 中 如何将自己定义的值跟程序计算出来的text跟label的值保存在excel中？？求具体步骤跟代码~ 谢谢

如题所述

Public xlApp As Excel.Application
Public xlbook As Excel.Workbook
Public xlSheet As Excel.Worksheet

Set xlApp = CreateObject("excel.application")
Set xlbook = xlApp.Workbooks.Open(文件路径)
Set xlSheet = xlbook.Worksheets(1)

xlSheet.cells(1,1)=text1.text
xlSheet.cells(1,2)=lable1.caption

xlsbook.save
xlApp.quit追问

这段是在我保存excel的按钮click事件里敲吗？ 为什么我敲完了它显示子程序或函数中的属性无效？

追答

你要先引用EXCEL

追问

引用EXCEL是工程——引用——Microsoft Excel 12.0 Object Library，然后我要再添加一个窗口添加DataGrid控件么？？ 我在新建的form里放入了DataGrid控件，在它的click事件里复制的你的代码，但是Text1出错，它显示子程序或函数中的属性无效，我怎么弄？？

追答

你的看你有没有Text1这个控件在窗体上呀。

你提问的时候说有Text1控件。

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/24psvvfff.html