导出Excel的显示和关闭问题
CS
objExcel.Visible = True ' 显示Excel
如果不写objExcel.Quit,就会有Excel进程没有关闭。
如果写objExcel.Quit,显示Excel worksheet后会立刻关掉。
如何做才能两全?请指点,多谢!
[解决办法]
"如果不写objExcel.Quit,就会有Excel进程没有关闭。"
- - - - 你已经通过 “objExcel.Visible = True”显示了Excel ,就没有必要写“objExcel.Quit”,因为你可以在Excel窗口里关闭那个Excel窗口本身。如果你在Excel窗口里关闭它本身后还会有Excel进程没有关闭,那肯定是你前几次程序出错退出没有来得及关闭的Excel,直接结束那些Excel进程就可以了。为了避免这个问题错误,你在你的程序里加一条错误处理程序,把出错时的Excel关闭:
sub XXX()
On error goto Errorhandler
'.......
'这里是你的程序体
'.....
'...
Exit Sub
Errorhandler:
If Not (objExcel is Nothing) then
objExcel.Quit
End If
Exit Sub
End Sub
------------------------------------------
“Notes 邮件可以限制收件人的数量吗?如何限制?”
- - - - 没有简单的方法,你得自己修改邮件模板,因为可以用群组发邮件,群组成员是不固定的,而且群组可以嵌套群组。如果没有循环嵌套群组的话可以用递归遍历出群组成员,然后计数,在QuerySend事件里作判断。如果不考虑群组实现起来简单些,就是把那几个SendTo,CopyTo, BccTo字段的元素个数加起来判断一下即可。
------------------------------------------
“CS下禁止视图下的粘贴复制和剪切功能”
- - - - 你得给所有文档加一个"$KeepPrivate"字段,并且赋值为"1"