Gagner du temps sans boucle for

Guillaume -
Utilisateur anonyme - 11 janv. 2021 à 15:55

Bonjour le forum,

J'ai une petite demande qui concerne le temps d'exécution de ma macro.
L'objectif est de boucler sur chaque feuille et ensuite sur chaque valeur allant de 3 à 1000.

For Each sh In ActiveWorkbook.Worksheets
            For i = 3 To 1000

Pensez vous qu'avec un while je pourrais gagner plusieurs secondes et si oui, de quelle façon procéder ?

Merci d'avance,

Configuration: Windows / Edge 18.17763

A voir également:

Gagner du temps sans boucle for
Downloader for pc - Télécharger - Téléchargement & Transfert
Renommer plusieurs fichiers en même temps - Guide
Gagner de l'argent en regardant des videos tiktok - Accueil - Réseaux sociaux
Temps pour soi iphone - Guide
Combien de temps reste une story sur facebook - Guide

2 réponses

Réponse 1 / 2

jordane45 Messages postés 38486 Date d'inscription Statut Modérateur Dernière intervention 4 752

Bonjour,

Non.. aucun gain en changeant un foreach par un while ..

Par contre, si tu désactives l'affichage le temps du traitement.. là ..oui... tu vas en gagner

application.screenupdating = false
for each ..


next
' on reactive
application.screenupdating = true

Guillaume

Bonjour et merci pour ta réponse.

J'avais déjà essayé avec ceci :

Application.ScreenUpdating = False
Application.DisplayStatusBar = False
Application.EnableEvents = False
ActiveSheet.DisplayPageBreaks = False

Malheureusement ce n'est pas aussi concluant que je le souhaiterai..

Réponse 2 / 2

Utilisateur anonyme

Bonjour

Comme on ne sait pas ce qu’il y a dans ta boucle, on tire des plans sur la comète.

Le mien étant de passer par un tableau
https://silkyroad.developpez.com/vba/tableaux/

Discussions similaires

Durée d'une diapositive animée

35 GO à l'étranger

Je tiens combien de temps avec 2Go d'internet ?

Votre réponse

Discussions similaires