在我的计算机上生成报告大约需要3-4秒,之前在所有计算机上都是如此。但最近在办公室的几台计算机上报告生成开始需要30-40秒。在其他计算机上它仍然很快。我试图重新安装MS Office没有运气。
例如,此代码需要!!! 3 !!!执行秒数:
xlWS.Name = "INVOICE";
xlWS.PageSetup.PaperSize = XlPaperSize.xlPaperA4;
xlWS.PageSetup.TopMargin = xl.CentimetersToPoints(1.5);
xlWS.PageSetup.LeftMargin = xl.CentimetersToPoints(1);
xlWS.PageSetup.BottomMargin = xl.CentimetersToPoints(1.5);
xlWS.PageSetup.RightMargin = xl.CentimetersToPoints(1);
xlWS.PageSetup.Zoom = 60;
它能是什么?
提前谢谢。
答案 0 :(得分:2)
将默认打印机更改为本地打印机而不是网络打印机。弹出网线,可以肯定。然后请您的局域网管理员发布到serverfault.com
答案 1 :(得分:1)
设置Worksheet.PageSetup属性非常慢,但只需获取一个值就非常快。
因此,最好的方法是先检查每个值,确保需要设置它,然后只设置所需的属性。此外,它可以帮助设置'Application.ScreenUpdating = False'和'Application.Calculation = xlCalculationManual'。
使用您的代码作为起点,更新的代码可能如下所示:
Excel.Application excelApp = xlWS.Application;
bool origScreenUpdating = excelApp.ScreenUpdating;
Excel.XlCalculation origCalcMode = excelApp.Calculation;
try
{
myExcelApp.ScreenUpdating = False;
myExcelApp.Calculation = xlCalculationManual;
xlWS.Name = "INVOICE";
if (xlWS.PageSetup.PaperSize != XlPaperSize.xlPaperA4)
{
xlWS.PageSetup.PaperSize = XlPaperSize.xlPaperA4;
}
if (xlWS.PageSetup.TopMargin != xl.CentimetersToPoints(1.5))
{
xlWS.PageSetup.TopMargin = xl.CentimetersToPoints(1.5);
}
if (xlWS.PageSetup.LeftMargin != xl.CentimetersToPoints(1))
{
xlWS.PageSetup.LeftMargin = xl.CentimetersToPoints(1);
}
if (xlWS.PageSetup.BottomMargin != xl.CentimetersToPoints(1.5))
{
xlWS.PageSetup.BottomMargin = xl.CentimetersToPoints(1.5);
}
if (xlWS.PageSetup.RightMargin != xl.CentimetersToPoints(1))
{
xlWS.PageSetup.RightMargin = xl.CentimetersToPoints(1);
}
if (xlWS.PageSetup.Zoom != 60)
{
xlWS.PageSetup.Zoom = 60;
}
}
finally
{
myExcelApp.ScreenUpdating = origScreenUpdating;
myExcelApp.Calculation = origCalcMode;
}
这是你可以在Excel方面做的最好的事情 - 它通常会有很大帮助。但是,我不太确定这会对你的情况有多大帮助,因为看起来你可能会做出很多与默认设置不同的设置更改。因此,如果所有这些变化确实需要发生,首先检查需要进行的值可能无法帮助您。
但我的手指交叉了你......
- 迈克
(顺便说一句,对于交叉引用,这是我在同一主题上给出的VBA答案,其中OP看到了不错的性能提升:How to print faster in Excel VBA?)
答案 2 :(得分:1)
SpreadsheetGear for .NET可能会显着加快您的申请速度。您可以阅读我们的一些客户here的引用 - 其中许多引用指出了SpreadsheetGear for .NET提供的性能改进。
如果您想亲自试用,可以下载免费试用here。
免责声明:我拥有SpreadsheetGear LLC