exécution conditionnelle d'une macro

[ced]

Salut à tous,

je suis en train de programmer des feuilles de calculs excel afin d'améliorer l'archivage de mes données. Les macros ont bien été conçues seulement maintenant je souhaite que certaines macros ne s'exécutent que si la valeur d'une certaine cellule ('par ex E5') est < ou = à 5.

Il faudrait donc que j'intégre dans ma macro le code de ce test qui indique que si la condition est réalisée alors le prgm peut continuer à s'exécuter, sinon on s'arrête là et une message box s'affiche pour indiquer à l'utilisateur que la recup n'est pas possible.

Pourriez vous m'aider SVP pour finaliser au plus vite mon projet ...
(quel code dois je taper ?)

Merci pour toutes vos collaborations

A+

CED

 

[@Christophe@]

Bonjour Ced

Ben tous simplement comme cela:

Sub TaMacro()
If Range("E5").value > 5 then

ton code

else
Msgbox "Annulation"
exit sub
end sub

Et voila,

@Christophe@

 

[ced]

Merci beaucoup cela fonctionne à merveille
Il est vraiment temps que je me familiarise avec VBA mais ce n'est pas chose facile !

Heureusement que les pros d'excel sont sur ce forum

;-)

Bonne soirée

 

[Micc]

Salut Ced et Christophe

Si tu veux faire cela automatiquement au démarrage de ton programme tu fais ce qui dit Christophe dans la partie ThisWorkbook comme ceci :

Private Sub Workbook_Open()

Sheets("Onglet qui contient le test E5").Select
If Range("E5").value > 5 then

Call Macro qui contient ton code

else
Msgbox "Annulation"
exit sub

End Sub

@+