macro (temps exécution long)

[BRUNO62]

Bonsoir à tous,

J'ai une macro qui fonctionne bien sur toute sa longueur par contre je suis surpris sur le délai d'exécution de la dernière étape qui consiste à la fin de supprimer quelques lignes sur une feuille. L'opération dure trois minutes !

Avez vous une solution pour diminuer ce temps d'exécution ?

Sheets("Feuil4").Select
.Range("1:3,5:5").Delete
End With
End Sub

a+

 

[Papou-net]

Re : macro (temps exécution long)

Bonsoir à tous,

J'ai une macro qui fonctionne bien sur toute sa longueur par contre je suis surpris sur le délai d'exécution de la dernière étape qui consiste à la fin de supprimer quelques lignes sur une feuille. L'opération dure trois minutes !

Avez vous une solution pour diminuer ce temps d'exécution ?

Sheets("Feuil4").Select
.Range("1:3,5:5").Delete
End With
End Sub

a+

Bonsoir BRUNO62,

Peut-être qu'en modifiant ainsi :

Sheets("Feuil4").Range("1:3,5:5").EntireRow.Delete
End With
End Sub

Mais c'est sans garantie, je n'ai pas testé. Je pense simplement que ta méthode efface cellule après cellule, alors que moi je te propose de supprimer les lignes entières d'un seul coup.

Espérant avoir répondu.

Cordialement.

 

[BRUNO62]

Re : macro (temps exécution long)

Papou-net ,
Merci et désolé, le emps d'exécution est le même.
a+

 

[Papou-net]

Re : macro (temps exécution long)

Papou-net ,
Merci et désolé, le emps d'exécution est le même.
a+

RE :

Est-ce que tu n'aurais pas, par hasard, des instructions dans les événements de ta feuille de calcul ?

Sinon essaies de lancer ta macro par le pas à pas (touche F8) et observe bien le déroulement.

A te lire.

Cordialement.

 

[ROGER2327]

Re : macro (temps exécution long)

Bonsoir BRUNO62, Papou-net

Difficile à juger sans voir, mais peut-être que :

[B][COLOR="DarkSlateGray"]Application.EnableEvents = False
Sheets("Feuil4").Range("1:3,5:5").EntireRow.Delete
Application.EnableEvents = True[/COLOR][/B]

Si, comme l'imagine Papou-net, il traine une quelconque procédure évènementielle dans le secteur, ça pourrait être utile.
Une autre possibilité s'il y a beaucoup de calcul serait de désactiver le calcul automatique.​

ROGER2327
#3274