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

这个细胞是否从其他细胞中引用？检查是否有与此单元格相关的复杂计算。

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

1 个答案: