Question

VB中点击保存后能不能把数据自动保存到设定好的EXCEL表格中

如果在VB的界面上把一些数据填写好,点击保存后,能够把这些数据同时保存在一个已经设定好的EXCEL表格中,并能自动另存到指定的地方,

Answer 1

需要引用的Microsoft Excel 11.0对象（Excel 2003中）

昏暗前为Object

昏暗ExBook作宾语

昏暗ExSheet作宾语

私子commandbutton1_click（）

设置防爆=的CreateObject（“Excel.Application的”）

设置ExBook = Ex.Workbooks（）。添加

设置ExSheet = ExBook.Worksheets（“工作表Sheet1”）/ /打开

对于i = 0到10

ExSheet.cells（我+1,1）。值= A（I）

下一个I / /赋值

ActiveWorkbook.SaveAs（“D：\ my.xls”）/ /保存

Ex.Quit

设置xlSheet =无

集xlBook =无

集XLS =没有/ /退出

结束子

追问

不懂