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

Afficher la suite

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
Temps pour soi iphone - Guide
Dans le diaporama à télécharger, les diapositives s’enchaînent automatiquement. combien de temps la diapositive crayon met-elle à s’afficher ? combien de temps reste-t-elle affichée à l’écran ? ✓ - Forum Powerpoint
Temps validation annonce le bon coin - Forum Hotmail / Outlook.com

2 réponses

Réponse 1 / 2

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

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

Mon pc s'allume et s'éteint en boucle

Durée du sablier Snapchat

Acces à snapchat temporairement désactivé

Créer un powerpoint "Qui veut gagner des millions"

Family link : les temps ne correspondent pas !

Discussions similaires

Newsletters