如何用vb结合excel，以时间为文件名进行保存，并向该excel中保存实时数据

Question

如题所述

Answer 1

dim exapp as excel.application
dim exbook as excel,application
dim shijian as string
set exapp=createobject("excel.aaplication")
exapp.visible=true
set exbook=exapp.activeworkbook
exapp.cells(1,1)="shuju"'你想保存的数据
shijian=time(now)
exbook.saveas("c:\"&shijian)
exapp.quit
set exapp=nothing

具体点，可以HI我