VBA Comment exécuter une partie du code pour test

Bonjour,

Comment exécuter une partie de cette macro pour test?

Par exemple je veux exécuter juste la partie du code 2 pour test.

Sub Exemple()

Code 1
.............
.............
.............

Code 2
..........................
..........................
..........................

Code 3
.......................................
.......................................
.......................................

Code 4
....................................................
....................................................
....................................................

End Sub

Merci par avance pour votre retour.

Bonjour,

L'idéal est d'anticiper cela en créant initialement des petites fonctions et/ou Sub :

Sub Appel()
a = Code 1
b = Code 2
c = Code 3
Call Code 4
End Sub

Function Code 1()
.............
.............
.............
End Function

Function Code 2()
..........................
..........................
..........................
End Function

Function Code 3()
.......................................
.......................................
.......................................
End Function
Sub Code 4()
....................................................
....................................................
....................................................

End Sub

ça c'est dans l'idéal.

Dans ton cas, tu peux mettre en commentaire les parties à ne pas exécuter en plaçant une apostrophe en début de ligne :

Sub Exemple()

' Code 1
' .............
' .............
' .............

Code 2
..........................
..........................
..........................

' Code 3
' .......................................
' .......................................
' .......................................

' Code 4
' ....................................................
' ....................................................
' ....................................................

End Sub

Bonjour,

Je te remercie pour tes deux réponses

Pour la première réponse je vais la prendre en considération pour mes prochaine macros.

Pour la deuxième solution je l'utilise déjà, mais j'ai des Sub qui sont assez lentes et parfois je suis amené à faire des modifications dans un code de la Sub, donc pour faires des apostrophes pour le reste du code soit au début ou à la fin c'est un peu gênant pou moi.

Y a pas cette possibilité via l'Editeur pour exécuter juste une partie du code? Par exemple limiter le début et la fin du code à exécuter?

Merci par avance pour ta réponse.

Bonjour,

Non pas de possibilité dans l'éditeur.

Ce que tu peux faire c'est copier/coller le code que tu veux tester dans une Sub.

Sub Test()
Code 2
.............
.............
..........
End Sub

Une autre solution est d'utiliser des Goto. Seulement n'oublie pas de les enlever après tes tests :

Sub Exemple()
Goto test       'EN DEBUT DE MACRO => va sauter à "l'étiquette" test
Code 1          'ne sera pas exécuté
.............
.............
.............
test:            'ETIQUETTE test
Code 2           'sera exécuté
..........................
..........................
..........................
Goto fin            'Va sauter à l'étiquette fin
Code 3              'ne sera pas exécuté
.......................................
.......................................
.......................................

Code 4
....................................................
....................................................
....................................................
fin:           'ETIQUETTE fin
End Sub

Bonjour,

Je vous remercie infiniment pour ta réponse Goto qui va solutionner mon souci des tests

Cordialement.