Concaténation

P

Pedro

Guest
J'ai écrit une application en VBA qui utilise une très grande quantité de chaines de caractères concaténée a l'intérieure d'une boucle.

Évidemment l'éxécution du programme est ridiculement longue.

Ya-t-il une alternative a l'utilisation de l'opérateur "&", moins gourmande en ressources systeme?

ex:

Count = 0
While Count < 2000

Worksheets(2).Cells(1, Count) = "='" & nomrepertoire(Count) & "\" & "[" & nomfichier(Count) & "]" & "Feuil1" & "'!" & "C" & CStr(Count)

Count = Count + 1
Wend




Merci
 
L

LeChat

Guest
Bonjour,

En utilisant avant ton traitement la ligne suivante :

Application.Calculation = xlCalculationManual

qui force excel à ne pas recalculer systèmatiquement.
Puis à la fin de ton traitement tu ajoute cette ligne :

Application.Calculation = xlCalculationAutomatic

qui rétablis le calcul automatique d'excel.
 

Statistiques des forums

Discussions
312 576
Messages
2 089 836
Membres
104 287
dernier inscrit
kahinaaittouares@hotmail.