Office中国论坛/Access中国论坛

标题: 紧急求救,如何通过vba在指定目录建一excel文件..... [打印本页]

作者: rtmx01 时间: 2006-6-13 19:42
标题: 紧急求救,如何通过vba在指定目录建一excel文件.....
紧急求救,如何通过vba在指定目录建一excel文件,并打开,通过vba代码在指定单元格写入数据,并保存,并闭excel文件.

最好能给出源码,谢谢!!

作者: crg770502 时间: 2006-6-14 01:47
[attach]18474[/attach]

作者: fan0217 时间: 2006-6-14 03:57
把楼上的代码贴出来方便大家查看：

Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet '将对象引用赋值给这些变量。
'用 Add方法创建新的工作簿和工作表对象。
Set xlApp = New Excel.Application
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlBook.Worksheets.Add
'值赋给Microsoft Excel 单元。
xlSheet.Cells(1, 1).Value = "aaaaaaaaaaaaaa"
xlSheet.Cells(2, 1).Value = "bbbbbbbbbbbbbb"
'保存工作表
xlSheet.SaveAs Application.CurrentProject.Path & "\Temp.xls"
xlBook.Close
Set xlApp = Nothing
MsgBox "完成"

作者: nxjswt 时间: 2006-6-14 07:17
学习[em01]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)