一个令人迷惑的问题,是我的程序问题还是EXCEL的问题?

Question

在你的xlApp.Workbooks[1].Close;后面添加：
VarClear(Sheet);
VarClear(Selection);
看看？

Answer 1

TO KINGRON
还是不行呀!

Answer 2

我观察程序EXCEL的运行,发现一个奇怪现象,EXCEL的更改速度有边化,首先是一般速度,刷新速度也可以,但做了一段时间就慢了下来,刷新速度也跟不上,屏幕闪得很,但又过了一会,突然更改的速度反而变快了,再接下来不久就报系统资源不足.

Answer 3

请在
  xlapp.visible := true;
后面添加：
  xlApp.ScreenUpdating := False;
在    xlapp.quit;
前面添加    xlapp.ScreenUpdating := True;根据测试，应该是Excel在更新界面的时候，占用了资源，但是没有完全释放。如果禁止屏幕更新，这样既可以提高效率，又不会占用大量的资源。
你用这种方法试一下，看还会不会内存不足？我测试了100多个文件，没有问题。