“无法设置Range类的NumberFormat属性”

此代码已经工作了很长时间。 我想也许我不小心按了一个键,但我似乎无法看到它。 我突然得到错误:

无法设置Range类的NumberFormat属性

在下面的代码中:

Worksheets("Sheet1").Cells(y + k, x + j).Select TempValue = Worksheets("Sheet1").Cells(y + k, x + j).Value Worksheets("Sheet1").Cells(y + k, x + j).NumberFormat = "#,##0" //ERROR HERE Worksheets("Sheet1").Cells(y + k, x + j).Value = TempValue 

在聊天中发现的问题是工作簿有超过64,000格式,因为在Excel中用户得到“ 太多不同的单元格格式 ”错误信息

主题:在Excel中收到“太多不同的单元格格式”错误消息

链接 : http : //support.microsoft.com/kb/213904

QUOTE从上面的链接

在Microsoft Excel 2007/2010文件可能会产生以下错误信息;

Excel在文件中发现不可读的内容

当工作簿包含Excel 2003中的单元格格式的大约4,000种不同组合或Excel 2007及更高版本中的64,000时,会发生此问题。

链接中提到的解决scheme是下载并运行XLStyesTool