数组单元格的非常简单的设定值，当他在指定列上写入时程序非常慢

Question

我正在使用一个连续的和旧的专业程序。我计划建立几个简单的数据阵列和阵列写入这样的Excel单元格：

Sheets("toto").Cells(4,i) = "blabla" 

但对于i一个值，写入时间很长，我不明白为什么。

这里是我的代码：

... 
For No_Bug = 0 To Indtab - 1 
    If mesComments(No_Bug) <> "" Then 
     Sheets(feuille_LBT).Cells(Ligne_Bug, 1) = Ligne_Bug - 5 
     Sheets(feuille_LBT).Cells(Ligne_Bug, 2) = mesID_Test(No_Bug) 
     Sheets(feuille_LBT).Cells(Ligne_Bug, 3) = mesResultats(No_Bug) 
     Sheets(feuille_LBT).Cells(Ligne_Bug, 4) = mesComments(No_Bug) 
     Sheets(feuille_LBT).Cells(Ligne_Bug, 5).FormulaLocal = mesScreens(No_Bug) 
     Sheets(feuille_LBT).Cells(Ligne_Bug, 6) = 2 'If I comment only this line, the programm is fast, ifnot the programm is very slow (~1, 2 secondes per loop), What the hell ??? xD 
     Sheets(feuille_LBT).Cells(Ligne_Bug, 7) = 1 
End If 
... 

Answer 1

这是单元与其它单元引用？检查是否有与这个单元相关的复杂计算。