[NuitBlanche]

Bonjour j'ai réalisé un macro sur excel et je souhaiterais le faire recommencer indéfiniment. Je souhaiterais connaitre le commande pour celà.

Merci d'avance

[Krogoth]

Je connais pas les macros Excel mais avec des rapides recherche j'ai trouvé ça :

Code:

Sub Boucle()
    Dim X As Integer
    Do
        code de ta précédente macro
    Loop Until X = 2
End Sub

essaie ça

[NuitBlanche]

nikel cromosome ^^

Merci bien meme si je comprend pas trop le principe du code... Y fera jamais 2 donc il continue non stop .c'est ça ?

Merci en tout cas

[Syrus]

Code:

Do while true
   code de la macro
Loop

Le programme va boucler indéfiniment et bloquer le PC...

Quand tu dis indéfiniment, ça veut dire en tâche de fond? Parce que je ne sais pas si Excel gère le multi-thread...

[NuitBlanche]

Sauf qu'a un moment la macro ne peut plus se faire donc ça sarrete tout seul

[Syrus]

Si elle ne peut s'exécuter indéfiniment c'est qu'il y a un critère d'arrêt.

C'est plutôt un truc du genre alors:

Code:

Do
   Code
Loop Until (critère d'arrêt)

C'est quoi le but de la procédure?

[NuitBlanche]

Importer les données des nombreuses feuilles d'un classeur vers une page resume.

Le code le fait pour une page et puis sélectionne la page suivante.
En faisant recommencé indéfiniment le macro, ben il s'arrête de toute façon lorsqu'il n'y a plus de feuilles suivante dans le classeur.

[cricri]

dim vnt as variant
for each vnt in sheets
vnt.select
ton code pour une page
next vnt

[Krogoth]

j'avais laissé le loop until au cas ou tu veuille mettre une valeure.
suffit enssuite de mettre x= x+1 puis le nb de fois a executer à la place du 2.