optimisation de boucles

Bonjour,

J'ai le code suivant en vba :

For i = 1 To n
For j = 1 To n1
[debut1].Cells(i, j).Value = tab1(i, j)
Next j
For j = 1 To n2
[debut2].Cells(i, j).Value = tab2(i, j)
Next j
Next i

En fait, je fais des calculs que je stocke dans des tableaux (tab1 et tab2).
A la fin du code je souhaite écrire ces tableaux sur ma feuille excel (cf code ci dessus).
Le problème est que cette écriture prend beaucoup de temps.

Y a t-il moyen d'optimiser ce code par une écriture plus rapide ?

Par avance merci

pierref