Exécuter une macro 100 fois

Bonjour,

Je me permets de vous contacter afin d'automatiser un enchainement de macro.

La macro suivante permet de réaliser de manière automatique mes besoins. Je souhaite qu'elle se réalise dans cet ordre 4190 fois !! :

Sub autonmatisationtotal()
'
' autonmatisationtotal Macro
'

AUTOMAT
etape8

End Sub


Pouvez-vous m'aider à partir de cette macro ?
Merci par avance !
Jean

Configuration: Windows / Chrome 85.0.4183.102

1 réponse

  1. Bonjour

    Pas très clair, mais bon j'essaie quand meême !
    Deux solutions
    Solution 1. Avec une procedure qui relance 4090 fois ta macro
    Sub ok()
    Dim k As Long
    For k = 1 To 4090
    Call autonmatisationtotal
    Next k
    End Sub

    Sub autonmatisationtotal()
    '
    ' autonmatisationtotal Macro
    '
    AUTOMAT
    etape8
    End Sub


    Solution 2. Boucle qui repéte 4090 fois la séquence contenue dans ta macro
    Sub autonmatisationtotal()
    Dim k As Long
    '
    ' autonmatisationtotal Macro
    '
    For k = 1 To 4090
    AUTOMAT
    etape8
    Next k
    End Sub


    Cdlmnt
    0