你程序结束后,应该
set slsheet=nothing
xlapp.quit
并且创建excel对象时,首先要判断是否在内存中已经有excel对象,如有则用getobject,没有则新建。
set slsheet=nothing
xlapp.quit
并且创建excel对象时,首先要判断是否在内存中已经有excel对象,如有则用getobject,没有则新建。
解决方案 »
- 删除数组中的0
- 求一简单问题。怎么样与调用应用程序
- 急!!!Form2中定义的变量如何在Form1中访问!!在先等·!·!
- 高手请进,打包问题
- 请问如何判断recordset中的某个field的类型,是数字还是字符串或其他?
- Access数据库中的[说明]该如何定义?
- 介绍好的电子表格控件
- 关于批量删除与数据库连接的问题?
- 例子代码:综合输入过滤、校验、修正与提示(文本、数字、时间、邮政编码等)
- ---SOS---- somebody help me!
- fuck,csdn上的共享软件有病毒!!!11
- sos! 救命啊~~~!!!救命啊~~~!!!救命啊~~~!!!救命啊~~~!!!救命啊~~~!!!
Set appExcel = GetObject(, "Excel.Application") 'look for a running copy of xcel
If Err.Number <> 0 Then 'If Excel is not running then
Set appExcel = CreateObject("Excel.Application") 'run it
End If
Err.Clear ' Clear Err object in case error occurred.